distro-build: recognize timeout and exceptions as failure

original commit: 1e2c6e243afc42a75290b78d7d39dae6b2e78726
This commit is contained in:
Matthew Flatt 2013-11-08 06:58:39 -07:00
parent 19b488e135
commit 5dc96910fa

View File

@ -434,7 +434,8 @@
(unless timeout?
(set! stop? #t)))
(log-error "~a failed..." (client-name c))
(log-error (exn-message exn)))])
(log-error (exn-message exn))
#f)])
(thunk)))
(custodian-shutdown-all cust))))