simon/post-scarcity
1
0
Fork 0
Code Issues 4 Pull requests Projects Releases Packages Wiki Activity Actions

Careful debugging of the memory leak problem. At this stage,

Browse source 
stack frames for interpreted (but not primitive) functions appear not to be being
reclaimed, and the oblist doesn't seem to be being fully reclaimed.
This commit is contained in:
Simon Brooke 2026-02-20 19:39:19 +00:00
parent 8629e33f92
commit 70376c6529
14 changed files with 156 additions and 50 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/defun.lisp
View file

@ -1,9 +1,9 @@
(set! symbolp (lambda (x) (equal (type x) "SYMB")))
(set! symbol? (lambda (x) (equal (type x) "SYMB")))
(set! defun!
(nlambda
form
(cond ((symbolp (car form))
(cond ((symbol? (car form))
(set (car form) (apply 'lambda (cdr form))))
(t nil))))
@ -17,7 +17,7 @@
(set! defsp!
(nlambda
form
(cond (symbolp (car form))
(cond (symbol? (car form))
(set! (car form) (apply nlambda (cdr form))))))
(defsp! cube (x) ((* x x x)))