aboutsummaryrefslogtreecommitdiff
path: root/src/interp/spaderror.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/spaderror.lisp')
-rw-r--r--src/interp/spaderror.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/spaderror.lisp b/src/interp/spaderror.lisp
index 3a07ad21..8d4eab9e 100644
--- a/src/interp/spaderror.lisp
+++ b/src/interp/spaderror.lisp
@@ -86,7 +86,7 @@
(setq |$BreakMode| |$oldBreakMode|)
nil)) ;; resets error handler
((and (null |$inLispVM|)
- (memq |$BreakMode| '(|nobreak| |query| |resume|)))
+ (|symbolMember?| |$BreakMode| '(|nobreak| |query| |resume|)))
(let ((|$inLispVM| T)) ;; turn off handler
(return
(|systemError| (error-format error-string args)))))