aboutsummaryrefslogtreecommitdiff
path: root/src/interp/vmlisp.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-05-19 17:02:42 +0000
committerdos-reis <gdr@axiomatics.org>2011-05-19 17:02:42 +0000
commit5c4ff220c3ba9a37ffaf875e218c36ae0a436631 (patch)
treefa3160f03e36c6630c8a21e9ad0d9db035bc6d48 /src/interp/vmlisp.lisp
parentef1f327becb0cc095e887dcfe98f9e390d225ed8 (diff)
downloadopen-axiom-5c4ff220c3ba9a37ffaf875e218c36ae0a436631.tar.gz
* interp/i-analy.boot (bottomUpForm0): Tidy.
* interp/i-eval.boot (evalForm): Likewise. * interp/buildom.boot (formalRecordField): New. (eltRecordFun): Use it. (seteltRecordFun): New. * interp/g-opt.boot (optSETRECORDELT): Remove. (optRECORDCOPY): Likewise. * interp/vmlisp.lisp (MAKE-VEC): Likewise.
Diffstat (limited to 'src/interp/vmlisp.lisp')
-rw-r--r--src/interp/vmlisp.lisp2
1 files changed, 0 insertions, 2 deletions
diff --git a/src/interp/vmlisp.lisp b/src/interp/vmlisp.lisp
index 4159b32d..0f3d1f2f 100644
--- a/src/interp/vmlisp.lisp
+++ b/src/interp/vmlisp.lisp
@@ -782,8 +782,6 @@
; 16.1 Creation
-(defun MAKE-VEC (n) (make-array n))
-
(defun GETREFV (n)
(make-array n :initial-element nil))