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

builder.test: Show tests which fail in addition to vocabularies

db4
Eduardo Cavazos 2008-03-08 22:46:57 -06:00
parent d7d64b202f
commit 57c772303f
1 changed files with 12 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
extra/builder/test/test.factor
View File

@ -7,6 +7,7 @@ USING: kernel namespaces sequences assocs builder continuations
tools.browser tools.browser
tools.test tools.test
io.encodings.utf8 io.encodings.utf8
combinators.cleave
bootstrap.stage2 benchmark builder.util ; bootstrap.stage2 benchmark builder.util ;
IN: builder.test IN: builder.test
@ -14,8 +15,18 @@ IN: builder.test
: do-load ( -- ) : do-load ( -- )
try-everything keys "../load-everything-vocabs" utf8 [ . ] with-file-writer ; try-everything keys "../load-everything-vocabs" utf8 [ . ] with-file-writer ;
! : do-tests ( -- )
! run-all-tests keys "../test-all-vocabs" utf8 [ . ] with-file-writer ;
: do-tests ( -- ) : do-tests ( -- )
run-all-tests keys "../test-all-vocabs" utf8 [ . ] with-file-writer ; run-all-tests
"../test-all-vocabs" utf8
[
[ keys . ]
[ test-failures. ]
bi
]
with-file-writer ;
: do-benchmarks ( -- ) : do-benchmarks ( -- )
run-benchmarks "../benchmarks" utf8 [ . ] with-file-writer ; run-benchmarks "../benchmarks" utf8 [ . ] with-file-writer ;