aboutsummaryrefslogtreecommitdiff
path: root/src/interp/vmlisp.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-12-30 03:11:09 +0000
committerdos-reis <gdr@axiomatics.org>2010-12-30 03:11:09 +0000
commit865e926e0c7b9f8ad6201315a41a89b2258d77a7 (patch)
treef0fa217290170432c70485846600e0f776505165 /src/interp/vmlisp.lisp
parent68441ed372470b7d3eb3d24178b61dc16bc6978e (diff)
downloadopen-axiom-865e926e0c7b9f8ad6201315a41a89b2258d77a7.tar.gz
more char cleanup
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 4f213b69..696c8821 100644
--- a/src/interp/vmlisp.lisp
+++ b/src/interp/vmlisp.lisp
@@ -923,8 +923,6 @@
; 17.2 Accessing
-(defun QENUM (cvec ind) (char-code (char cvec ind)))
-
(defun QESET (cvec ind c)
(setf (char cvec ind) c))