aboutsummaryrefslogtreecommitdiff
path: root/src/interp/macros.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/macros.lisp')
-rw-r--r--src/interp/macros.lisp4
1 files changed, 0 insertions, 4 deletions
diff --git a/src/interp/macros.lisp b/src/interp/macros.lisp
index e9fff330..a99b3e4e 100644
--- a/src/interp/macros.lisp
+++ b/src/interp/macros.lisp
@@ -215,10 +215,6 @@
((EQL (CDR L) TL) (RPLACD L NIL))
((TRUNCLIST-1 (CDR L) TL))))
-; 15.3 Alteration of List Structure
-
-(defun RPLACW (x w) (let (y z) (dsetq (Y . Z) w) (RPLACA X Y) (RPLACD X Z) X))
-
; 15.4 Substitution of Expressions
(DEFUN SUBSTEQ (NEW OLD FORM)