2
0
Fork 0
mirror of git://git.savannah.gnu.org/guix/data-service.git synced 2023-12-14 03:23:03 +01:00

Fail early if the inferior is #f

This happens when the repl can't be loaded for example.
This commit is contained in:
Christopher Baines 2019-09-29 10:45:46 +01:00
parent 208122317a
commit 580900b0f4

View file

@ -773,6 +773,9 @@ WHERE job_id = $1"
(open-inferior store-path))))))
(setenv "GUIX_LOCPATH" guix-locpath) ; restore GUIX_LOCPATH
(when (eq? inf #f)
(error "error: inferior is #f"))
;; Normalise the locale for the inferior process
(catch
'system-error