aboutsummaryrefslogtreecommitdiff
path: root/src/interp/daase.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/daase.lisp')
-rw-r--r--src/interp/daase.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/daase.lisp b/src/interp/daase.lisp
index bec950bc..c51f8ef2 100644
--- a/src/interp/daase.lisp
+++ b/src/interp/daase.lisp
@@ -1566,7 +1566,7 @@
(flat expr)
(dolist (leaf leaves)
(when (setq pos (position leaf *compressvector*))
- (nsubst (- pos) leaf expr)))
+ (|substitute!| (- pos) leaf expr)))
expr)))
(defun write-operationdb ()