forgot test.factor
parent
fc1d635773
commit
678faa0f41
|
@ -0,0 +1,16 @@
|
|||
IN: test
|
||||
USE: compiler
|
||||
USE: namespaces
|
||||
USE: stdio
|
||||
USE: stack
|
||||
USE: test
|
||||
USE: words
|
||||
|
||||
: must-compile ( word -- )
|
||||
"compile" get [
|
||||
"Checking if " write dup write " was compiled" print
|
||||
dup compile
|
||||
worddef compiled? assert
|
||||
] [
|
||||
drop
|
||||
] ifte ;
|
Loading…
Reference in New Issue