builder: minor cleanup
parent
38cb694779
commit
4acd6018b3
|
@ -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
|
||||
|
|
Loading…
Reference in New Issue