2005-03-28 23:45:13 -05:00
|
|
|
IN: temporary
|
2005-08-22 20:54:01 -04:00
|
|
|
USING: compiler inference math generic parser ;
|
2005-03-26 20:40:29 -05:00
|
|
|
|
|
|
|
USE: test
|
|
|
|
|
|
|
|
: foo 1 2 ;
|
|
|
|
: bar foo foo ; compiled
|
|
|
|
: foo 1 2 3 ;
|
|
|
|
|
|
|
|
[ 1 2 3 1 2 3 ] [ bar ] unit-test
|
2005-08-21 23:35:50 -04:00
|
|
|
[ [ [ ] [ object object object ] ] ] [ [ foo ] infer ] unit-test
|
2005-08-22 20:54:01 -04:00
|
|
|
|
|
|
|
[ ] [
|
|
|
|
"IN: temporary : foo ; : bar foo ; : baz foo ; : foo ;" eval
|
|
|
|
] unit-test
|