diff options
author | dos-reis <gdr@axiomatics.org> | 2010-12-27 08:39:14 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2010-12-27 08:39:14 +0000 |
commit | dbbc18b48695c2339520e9ba1e640f7559ff2e8a (patch) | |
tree | 60e4dede3670bef78ad74415620c313fc12eba88 /src/boot/initial-env.lisp | |
parent | 66c8612e257defa8e42bb7b50b0c88a73422e660 (diff) | |
download | open-axiom-dbbc18b48695c2339520e9ba1e640f7559ff2e8a.tar.gz |
* boot/initial-env.lisp (IDENTP): Remove.
* boot/ast.boot: Replace IDENTP with symbol? where appropriate.
* boot/parser.boot: Likewise.
* boot/translator.boot: Likewise.
Diffstat (limited to 'src/boot/initial-env.lisp')
-rw-r--r-- | src/boot/initial-env.lisp | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/boot/initial-env.lisp b/src/boot/initial-env.lisp index a4b45b76..b5e9d869 100644 --- a/src/boot/initial-env.lisp +++ b/src/boot/initial-env.lisp @@ -178,9 +178,6 @@ (defun bvec-setelt (bv i x) (setf (sbit bv i) x)) -(defun identp (a) - (and (symbolp a) a)) - (defun |shoeReadLisp| (s n) (multiple-value-list (read-from-string s nil nil :start n))) |