diff options
-rw-r--r-- | src/ChangeLog | 4 | ||||
-rw-r--r-- | src/interp/vmlisp.lisp | 2 |
2 files changed, 4 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index b7c1c482..d13e7b4e 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,9 @@ 2015-12-26 Gabriel Dos Reis <gdr@axiomatics.org> + * interp/vmlisp.lisp (LASTELEM): Remove as unused. + +2015-12-26 Gabriel Dos Reis <gdr@axiomatics.org> + * interp/vmlisp.lisp (dispatchFunction): Remove. Adjust users. * interp/c-util.boot (lookupDefiningFunction): Use opcode '%function' in lieu of 'dispatchFunction'. diff --git a/src/interp/vmlisp.lisp b/src/interp/vmlisp.lisp index d517bc77..c4b95da4 100644 --- a/src/interp/vmlisp.lisp +++ b/src/interp/vmlisp.lisp @@ -1300,8 +1300,6 @@ (defmacro TL (&rest L) `(tail . ,L)) -(DEFUN LASTELEM (X) (car (|lastNode| X))) - (defun LISTOFATOMS (X) (COND ((NULL X) NIL) ((ATOM X) (LIST X)) |