steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

tools.test: flush the output stream

db4
Slava Pestov 2009-08-08 23:03:53 -05:00
parent e400d80d8b
commit 83e0c60573
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/tools/test/test.factor
View File

@ -80,7 +80,7 @@ MACRO: <experiment> ( word -- )
'[ _ ndup _ narray _ prefix ] ; '[ _ ndup _ narray _ prefix ] ;
: experiment. ( seq -- ) : experiment. ( seq -- )
[ first write ": " write ] [ rest . ] bi ; [ first write ": " write ] [ rest . flush ] bi ;
:: experiment ( word: ( -- error ? ) line# -- ) :: experiment ( word: ( -- error ? ) line# -- )
word <experiment> :> e word <experiment> :> e