diff options
Diffstat (limited to 'src/interp/spaderror.lisp')
| -rw-r--r-- | src/interp/spaderror.lisp | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/src/interp/spaderror.lisp b/src/interp/spaderror.lisp index aedfc5f9..42f65a32 100644 --- a/src/interp/spaderror.lisp +++ b/src/interp/spaderror.lisp @@ -44,12 +44,8 @@ ;;(defmacro |trappedSpadEval| (form) form) ;;nop for now #+:akcl -(defconstant |$quitTag| system::*quit-tag*) -#+:akcl (defun |resetStackLimits| () (system:reset-stack-limits)) #-:akcl -(defconstant |$quitTag| (gensym)) -#-:akcl (defun |resetStackLimits| () nil) ;; failed union branch -- value returned for numeric failure |