diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-09-20 22:26:53 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-09-21 16:48:36 +0200 |
commit | 71507435225f10d8d944ba183cbcc77ef953e0e5 (patch) | |
tree | 083c80e7362c7039318d961874503f98768a3238 /gnu/services | |
parent | a43e9157ef479e94c19951cc9d228cf153bf78ee (diff) | |
download | patches-71507435225f10d8d944ba183cbcc77ef953e0e5.tar patches-71507435225f10d8d944ba183cbcc77ef953e0e5.tar.gz |
inferior: Propagate '&store-protocol-error' error conditions.
Until now '&store-protocol-error' conditions raised in the inferior
would not be correctly propagated because SRFI-35 records lack a read
syntax.
Reported at <https://bugs.gnu.org/37449>
by Carl Dong <contact@carldong.me>.
* guix/inferior.scm (port->inferior): Import (srfi srfi-34) in the inferior.
(inferior-eval-with-store): Define 'error?' and 'error-message'. Wrap
call to PROC in 'guard'. Check the response of INFERIOR for a
'store-protocol-error' or a 'result' tag.
* tests/inferior.scm ("inferior-eval-with-store, &store-protocol-error"):
New test.
Diffstat (limited to 'gnu/services')
0 files changed, 0 insertions, 0 deletions