diff options
Diffstat (limited to 'src/interp/spaderror.lisp')
-rw-r--r-- | src/interp/spaderror.lisp | 2 |
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))))) |