Changeset 180 for trunk/thune/tests
- Timestamp:
- 06/10/06 03:12:25 (3 years ago)
- Location:
- trunk/thune/tests/working
- Files:
-
- 2 modified
-
control.good (modified) (1 diff)
-
control.t (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/thune/tests/working/control.good
r179 r180 14 14 8 15 15 9 16 --- each --- 17 each 1 18 each 2 19 each 'a 20 each 'b 21 each "one" 22 each "two" 23 each "tree" 16 24 --- foreach 0 --- 17 25 --- foreach 1 --- -
trunk/thune/tests/working/control.t
r179 r180 13 13 14 14 [1 2 'a 'b "one" "two" "tree"] :data 15 16 17 "--- each ---" print 18 data ["each " [prin] each .] each ; nested each 19 15 20 16 21 "--- foreach 0 ---" print
