Merge branch 'release/0.0.4' into develop

This commit is contained in:
Simon Brooke 2018-12-28 22:36:43 +00:00
commit a2afbe030f
2 changed files with 6 additions and 4 deletions

View file

@ -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))

View file

@ -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"