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

builder: Update for new 'benchmark' effect

db4
Eduardo Cavazos 2008-05-09 09:11:46 -05:00
parent b1566be844
commit 83c4f87a2f
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -26,8 +26,8 @@ IN: builder.test
: do-all ( -- ) : do-all ( -- )
bootstrap-time get "../boot-time" utf8 [ . ] with-file-writer bootstrap-time get "../boot-time" utf8 [ . ] with-file-writer
[ do-load ] runtime "../load-time" utf8 [ . ] with-file-writer [ do-load ] benchmark "../load-time" utf8 [ . ] with-file-writer
[ do-tests ] runtime "../test-time" utf8 [ . ] with-file-writer [ do-tests ] benchmark "../test-time" utf8 [ . ] with-file-writer
do-help-lint do-help-lint
do-benchmarks ; do-benchmarks ;

2
extra/builder/util/util.factor
View File

@ -12,7 +12,7 @@ IN: builder.util
! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! ! !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
: runtime ( quot -- time ) benchmark nip ; : runtime ( quot -- time ) benchmark ;
: minutes>ms ( min -- ms ) 60 * 1000 * ; : minutes>ms ( min -- ms ) 60 * 1000 * ;