Upversioned, README updated
This commit is contained in:
parent
3d2d680041
commit
2d5fc4a202
|
@ -1,10 +1,12 @@
|
||||||
;; Because I don't (yet) have syntax for varargs, the body must be passed
|
(set! list (lambda l l))
|
||||||
;; to defun as a list of sexprs.
|
|
||||||
|
(set! symbolp (lambda (x) (equal (type x) "SYMB")))
|
||||||
|
|
||||||
(set! defun!
|
(set! defun!
|
||||||
(nlambda
|
(nlambda
|
||||||
form
|
form
|
||||||
(cond ((symbolp (car form))
|
(cond ((symbolp (car form))
|
||||||
(set (car form) (apply lambda (cdr form))))
|
(set (car form) (apply 'lambda (cdr form))))
|
||||||
(t nil))))
|
(t nil))))
|
||||||
|
|
||||||
(defun! square (x) (* x x))
|
(defun! square (x) (* x x))
|
||||||
|
|
|
@ -8,4 +8,4 @@
|
||||||
* Licensed under GPL version 2.0, or, at your option, any later version.
|
* Licensed under GPL version 2.0, or, at your option, any later version.
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#define VERSION "0.0.3"
|
#define VERSION "0.0.4"
|
||||||
|
|
Loading…
Reference in a new issue