From 03c09deff90cb2eb7a85730f7e74bce2df268b47 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Mon, 31 Jan 2011 01:48:20 +0000 Subject: * interp/vmlisp.lisp: Remove QREFELT, QSDEC1, QSETREFV, QSETVELT, QSETVELT-1, QSINC1, QVELT, QVELT-1. * algebra/si.spad.pamphlet: Use %iinc and %idec forms. --- src/interp/macros.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/interp/macros.lisp') diff --git a/src/interp/macros.lisp b/src/interp/macros.lisp index 69bd3b2e..1c013f0c 100644 --- a/src/interp/macros.lisp +++ b/src/interp/macros.lisp @@ -555,7 +555,7 @@ terminals and empty or at-end files. In Common Lisp, we must assume record size ; (spadcall ; (cons (|function| (lambda (#:G1420 |envArg|) #:G1420)) (vector)) ; |#1| -; (qrefelt |*1;f;1;initial;MV| 0)))))) +; (svref |*1;f;1;initial;MV| 0)))))) ; ; the (|function| (lambda form used to cause an infinite expansion loop ; -- cgit v1.2.3