Has anyone taken the time to port the basics of ANSI Common Lisp to newLisp as a loadable module?
I am considering writing a CL inside newLisp, so I can use "normal" Common Lisp expressions and functions in my newLisp code, but use newLisp specific things when it makes sense.
Yes, Lutz, I am aware this somewhat defeats the purpose of newLisp, but I want to do it anyway. :)
Seems like it would not be that hard to do.
<famous last words>
Imagine (from Land of Lisp http://landoflisp.com) inside newLisp:
Code: Select all
(defvar *small* 1)
(defvar *big* 100)
(defun guess-my-number ()
"Documentation for guess-my-number."
(ash (+ *small* *big*) -1))
(defun smaller () (setf *big* (1- (guess-my-number))) (guess-my-number))
(defun bigger () (setf *small* (1+ (guess-my-number))) (guess-my-number))
(defun start-over ()
(defparameter *small* 1) (defparameter *big* 100) (guess-my-number))