diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2011-11-03 02:20:50 -0400 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2011-11-03 02:20:50 -0400 |
| commit | 45b823e71d667785d1d70314cec13e3ac2bab2ef (patch) | |
| tree | 8358dcefd8ff82719e36b9e3199b34e3d470b602 | |
| parent | 75c7caa0d251cc30246512fd377377fad95b46f4 (diff) | |
| download | txr-45b823e71d667785d1d70314cec13e3ac2bab2ef.tar.gz txr-45b823e71d667785d1d70314cec13e3ac2bab2ef.tar.bz2 txr-45b823e71d667785d1d70314cec13e3ac2bab2ef.zip | |
* tests/008/students.txr: Use disciplined collect with :vars.
| -rw-r--r-- | ChangeLog | 4 | ||||
| -rw-r--r-- | tests/008/students.txr | 5 |
2 files changed, 5 insertions, 4 deletions
@@ -1,5 +1,9 @@ 2011-11-03 Kaz Kylheku <kaz@kylheku.com> + * tests/008/students.txr: Use disciplined collect with :vars. + +2011-11-03 Kaz Kylheku <kaz@kylheku.com> + * tests/008/students.txr: Regexes removed. 2011-11-02 Kaz Kylheku <kaz@kylheku.com> diff --git a/tests/008/students.txr b/tests/008/students.txr index 7d555227..8cf437cb 100644 --- a/tests/008/students.txr +++ b/tests/008/students.txr @@ -1,5 +1,5 @@ <Students> -@(collect) +@(collect :vars (NAME GENDER YEAR MONTH DAY (PET_TYPE "none") (PET_NAME ""))) @ (cases) <Student Name="@NAME" Gender="@GENDER" DateOfBirth="@YEAR-@MONTH-@DAY"@(skip) @ (or) @@ -7,9 +7,6 @@ @ (end) @ (maybe) <Pet Type="@PET_TYPE" Name="@PET_NAME" /> -@ (or) -@ (bind PET_TYPE "none") -@ (bind PET_NAME "") @ (end) @(until) </Students> |