peter
/
universalservice
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

uns_lisp: add first part of CPS transformer

This commit is contained in:
Peter McGoron 2024-07-14 02:12:09 -04:00
parent 7731d1136b
commit 73a9e320a5
2 changed files with 886 additions and 101 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

986
examples/lisp/uns_lisp.c
View File

File diff suppressed because it is too large Load Diff

1
examples/lisp/uns_lisp_cheney_c89.c
View File

@ -48,6 +48,7 @@ static void after_gc(Uns_GC gc, struct uns_cheney_c89_statistics *stats)
Uns_GC uns_lisp_gc_init(void) Uns_GC uns_lisp_gc_init(void)
{ {
Uns_GC gc = malloc(uns_gc_size); Uns_GC gc = malloc(uns_gc_size);
uns_gc_zero(gc);
if (!uns_cheney_c89_init(gc, 512)) { if (!uns_cheney_c89_init(gc, 512)) {
fprintf(stderr, "Error initializing GC\n"); fprintf(stderr, "Error initializing GC\n");
exit(1); exit(1);