diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-05-25 18:25:19 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-05-25 21:34:23 +0200 |
commit | 2abcc97fd1867176d5530f988ab34c26530de2c2 (patch) | |
tree | f83211356ce43e7496d00495966e616cec93b229 /.dir-locals.el | |
parent | fbb25e5651d4bd084b2af41078cffd9254d8f8a7 (diff) | |
download | patches-2abcc97fd1867176d5530f988ab34c26530de2c2.tar patches-2abcc97fd1867176d5530f988ab34c26530de2c2.tar.gz |
ui: Auto-compile user code, and improve error reporting.
Reported by Christian Grothoff.
* guix/ui.scm (load*): Add 'frame-with-source'. Set
%load-should-auto-compile. Change error handle to just (exit 1). Add
pre-unwind handler to capture the stack and call 'report-load-error'.
(report-load-error): Add optional 'frame' parameter and pass it to
'display-error'.
* tests/guix-system.sh: Add "unbound variable" test.
Diffstat (limited to '.dir-locals.el')
-rw-r--r-- | .dir-locals.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/.dir-locals.el b/.dir-locals.el index eb3da94da4..7ac7e13ff1 100644 --- a/.dir-locals.el +++ b/.dir-locals.el @@ -13,6 +13,7 @@ . ((indent-tabs-mode . nil) (eval . (put 'eval-when 'scheme-indent-function 1)) + (eval . (put 'call-with-prompt 'scheme-indent-function 1)) (eval . (put 'test-assert 'scheme-indent-function 1)) (eval . (put 'test-assertm 'scheme-indent-function 1)) (eval . (put 'test-equal 'scheme-indent-function 1)) |