aboutsummaryrefslogtreecommitdiff
path: root/src/interp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp')
-rw-r--r--src/interp/spaderror.lisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/interp/spaderror.lisp b/src/interp/spaderror.lisp
index 2967dc27..3a07ad21 100644
--- a/src/interp/spaderror.lisp
+++ b/src/interp/spaderror.lisp
@@ -54,9 +54,9 @@
#+:gcl
(defmacro |trapNumericErrors| (form)
`(let ((|$oldBreakMode| |$BreakMode|)
- (|$BreakMode| '|trapNumerics|))
- (val))
- (catch '|trapNumerics| ,form))
+ (|$BreakMode| '|trapNumerics|)
+ (val))
+ (catch '|trapNumerics| ,form)))
#-:gcl
(defmacro |trapNumericErrors| (form)