From 865e926e0c7b9f8ad6201315a41a89b2258d77a7 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Thu, 30 Dec 2010 03:11:09 +0000
Subject: more char cleanup

---
 src/interp/vmlisp.lisp | 2 --
 1 file changed, 2 deletions(-)

(limited to 'src/interp/vmlisp.lisp')

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))
 
-- 
cgit v1.2.3