utils: invoke: Raise exceptions using SRFI-34 and SRFI-35.
authorMark H Weaver <mhw@netris.org>
Fri, 16 Mar 2018 22:29:31 +0000 (18:29 -0400)
committerMark H Weaver <mhw@netris.org>
Sat, 17 Mar 2018 00:02:47 +0000 (20:02 -0400)
commitcbdfa50d9fb19704caa60818d7635047a6a26d71
tree433fdbfd04fe0850f3a2d8904de53c4f2c1605d0
parent23c0d40e1312663ef553ba7b6415a0ac483b591e
utils: invoke: Raise exceptions using SRFI-34 and SRFI-35.

* guix/build/utils.scm (&invoke-error): New condition type.
(invoke-error?, invoke-error-program, invoke-error-arguments)
(invoke-error-exit-status, invoke-error-term-signal)
(invoke-error-stop-signal): New exported procedures.
(invoke): Raise exceptions using SRFI-34 and SRFI-35.
* guix/ui.scm (call-with-error-handling): Add a guard clause
for &invoke-error conditions.
guix/build/utils.scm
guix/ui.scm