aboutsummaryrefslogtreecommitdiff
path: root/src/interp/debug.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2013-05-29 15:34:35 +0000
committerdos-reis <gdr@axiomatics.org>2013-05-29 15:34:35 +0000
commit9302bb2272f4e90b057548afe7c406f52b773e62 (patch)
tree03cc11710bd9cb265cf566d24e64b9aa80b1dcbe /src/interp/debug.lisp
parent2b324bcfd116749f4966dd1948f0d9bf7b4a0033 (diff)
downloadopen-axiom-9302bb2272f4e90b057548afe7c406f52b773e62.tar.gz
Simplify backend functions
Diffstat (limited to 'src/interp/debug.lisp')
-rw-r--r--src/interp/debug.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/debug.lisp b/src/interp/debug.lisp
index cae598bf..ba5fee2c 100644
--- a/src/interp/debug.lisp
+++ b/src/interp/debug.lisp
@@ -157,7 +157,7 @@
METAKEYLST DEFINITION_NAME (|$sourceFileTypes| '(|spad| |boot| |lisp| |lsp| |meta|))
($FUNCTION FN) $NEWSPAD $LINESTACK $LINENUMBER STACK STACKX BACK OK
TRAPFLAG |$InteractiveMode| COLUMN *QUERY LINE
- (|$backend| (if (eq op 'define) #'eval-defun #'compile-defun)))
+ (|$backend| #'|evaluateLispDefinition|))
(declare (special |$Echo| SINGLINEMODE INPUTSTREAM |$backend|
SPADERRORSTREAM ISID NBLNK COMMENTCHR /SOURCEFILES
METAKEYLST DEFINITION_NAME |$sourceFileTypes|