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

View File

@ -91,8 +91,6 @@ VAR: stamp
20 minutes>ms >>timeout
>desc ;
! : builder-test ( -- desc ) { factor-binary "-run=builder.test" } to-strings ;
: builder-test-cmd ( -- cmd )
{ factor-binary "-run=builder.test" } to-strings ;
@ -171,14 +169,8 @@ SYMBOL: build-status
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
"Boot time: " write "../boot-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