Fixing typo in lists-tests

db4
James Cash 2008-06-03 23:38:56 -04:00
parent 65f9fd9231
commit ed0468b8f5
1 changed files with 16 additions and 16 deletions

View File

@ -9,7 +9,7 @@ IN: lists.tests
T{ cons f 2
T{ cons f 3
T{ cons f 4
nil } } } } [ 2 + ] lmap
T{ cons f f f } } } } } [ 2 + ] lmap
] unit-test
{ 10 } [
@ -17,23 +17,23 @@ IN: lists.tests
T{ cons f 2
T{ cons f 3
T{ cons f 4
nil } } } } 0 [ + ] lreduce
T{ cons f f f } } } } } 0 [ + ] lreduce
] unit-test
T{
cons
f
1
T{
cons
f
2
T{
cons
f
T{ cons f 3 T{ cons f 4 T{ cons f 5 nil } } }
T{ cons f f f }
} } } [
{ T{ cons f
1
T{ cons f
2
T{ cons f
T{ cons f
3
T{ cons f
4
T{ cons f
T{ cons f 5 T{ cons f f f } }
T{ cons f f f } } } }
T{ cons f f f } } } }
} [
{ 1 2 { 3 4 { 5 } } } seq>cons
] unit-test