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

builder: minor cleanup

db4
Eduardo Cavazos 2008-02-18 19:11:26 -06:00
parent 38cb694779
commit 4acd6018b3
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
extra/builder/builder.factor
View File

@ -91,8 +91,6 @@ VAR: stamp
20 minutes>ms >>timeout 20 minutes>ms >>timeout
>desc ; >desc ;
! : builder-test ( -- desc ) { factor-binary "-run=builder.test" } to-strings ;
: builder-test-cmd ( -- cmd ) : builder-test-cmd ( -- cmd )
{ factor-binary "-run=builder.test" } to-strings ; { factor-binary "-run=builder.test" } to-strings ;
@ -171,14 +169,8 @@ SYMBOL: build-status
bootstrap [ "Bootstrap error" print "../boot-log" cat ] run-or-bail bootstrap [ "Bootstrap error" print "../boot-log" cat ] run-or-bail
! [ builder-test try-process ]
! [ "Builder test error" print throw ]
! recover
builder-test [ "Test error" print "../test-log" cat ] run-or-bail builder-test [ "Test error" print "../test-log" cat ] run-or-bail
"Boot time: " write "../boot-time" eval-file milli-seconds>time print "Boot time: " write "../boot-time" eval-file milli-seconds>time print
"Load time: " write "../load-time" eval-file milli-seconds>time print "Load time: " write "../load-time" eval-file milli-seconds>time print
"Test time: " write "../test-time" eval-file milli-seconds>time print nl "Test time: " write "../test-time" eval-file milli-seconds>time print nl