IN: temporary
USE: test
USE: kernel
USE: compiler
USE: inference
USE: words
USE: sequences

: fie [ ] [ ] if ;

[ ] [ \ fie dup word-def dataflow linearize drop ] unit-test

: foo all-words [ drop ] each ;

[ ] [ \ foo dup word-def dataflow linearize drop ] unit-test