factor/libs/lambda/test/lambda.factor

11 lines
400 B
Factor
Raw Normal View History

2006-08-17 01:27:21 -04:00
USING: lambda test hashtables sequences kernel ;
2006-08-06 20:31:29 -04:00
2006-08-17 01:27:21 -04:00
#! test simple parsing
[ "(A. A)" ] [ "(b.b)" lambda-parse second bound-vars swap expr>string ] unit-test
2006-08-06 20:31:29 -04:00
2006-08-17 01:27:21 -04:00
#! test name replacement
[ "(A. A)" ] [
"(b.b)" lambda-parse second "OK" H{ } clone [ set-hash ] keep
"OK" lambda-parse second replace-names bound-vars
swap expr>string
] unit-test