Fix gc bug and add condition classes

2026-02-28 13:22:34 -08:00
parent 45f6d7a53d
commit d21a5726e0
8 changed files with 96 additions and 5 deletions
@@ -21,9 +21,10 @@ int main(int argc, const char **argv) {
    push_stack_frame(Qnil, Qnil, Qnil);
    ReadStream s;
    read_stream_init(&s, src, src_len);
-    LispVal *l = read(&s);
-    Feval(l, Qnil);
-    lisp_gc_yield(NULL, true);
+    LispVal *r;
+    while ((r = read(&s))) {
+        Feval(r, Qnil);
+    }
    pop_stack_frame();
    lisp_shutdown();
    free(src);