diff options
Diffstat (limited to 'src/boot/initial-env.lisp')
| -rw-r--r-- | src/boot/initial-env.lisp | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/src/boot/initial-env.lisp b/src/boot/initial-env.lisp index b5e9d869..5a1041cb 100644 --- a/src/boot/initial-env.lisp +++ b/src/boot/initial-env.lisp @@ -119,11 +119,6 @@ (defun |shoePLACEP| (item) (eq item nil)) -(defun substring (cvec start length) - (if length - (subseq cvec start (+ start length)) - (subseq cvec start))) - (defun MAKE-HASHTABLE (id1) (let ((test (case id1 ((EQ ID) #'eq) |