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

Print a message when tests fail

db4
Slava Pestov 2008-10-20 21:07:46 -05:00
parent 636873a41c
commit 8d5135682f
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -12,6 +12,7 @@ SYMBOL: failures
error-continuation get 3array ; error-continuation get 3array ;
: failure ( error what -- ) : failure ( error what -- )
"--> test failed!" print
<failure> failures get push ; <failure> failures get push ;
SYMBOL: this-test SYMBOL: this-test