2004-12-05 21:17:09 -05:00
|
|
|
IN: scratchpad
|
|
|
|
|
USE: test
|
|
|
|
|
USE: compiler
|
|
|
|
|
USE: inference
|
|
|
|
|
USE: words
|
|
|
|
|
USE: math
|
2004-12-10 19:29:07 -05:00
|
|
|
USE: kernel
|
2004-12-19 22:53:41 -05:00
|
|
|
USE: lists
|
2004-12-05 21:17:09 -05:00
|
|
|
|
|
|
|
|
: foo 1 2 3 ;
|
|
|
|
|
|
2005-01-13 19:49:47 -05:00
|
|
|
! [ [ ] ] [ \ foo word-parameter dataflow kill-set ] unit-test
|
|
|
|
|
!
|
|
|
|
|
! [ [ [ + ] [ - ] ] ] [ [ 3 4 1 2 > [ + ] [ - ] ifte ] dataflow kill-set ] unit-test
|
|
|
|
|
!
|
|
|
|
|
! [ [ [ 1 ] [ 2 ] ] ] [ [ [ 1 ] [ 2 ] ifte ] dataflow kill-set ] unit-test
|
|
|
|
|
!
|
|
|
|
|
! [ [ [ 1 ] [ 2 ] ] ] [ [ t [ 1 ] [ 2 ] ifte ] dataflow kill-set ] unit-test
|
|
|
|
|
!
|
|
|
|
|
! [ [ t t f ] ] [ [ 1 2 ] [ 1 2 3 ] [ f <literal> ] map kill-mask ] unit-test
|
