Initial tricolor implementation

2026-01-22 07:49:47 -08:00
parent 1a0906206a
commit 6cc85491cf
8 changed files with 68 additions and 39 deletions
@@ -22,11 +22,6 @@ int main(int argc, const char **argv) {
    read_stream_init(&s, BUF, sizeof(BUF) - 1);
    LispVal *l = read(&s);
    Feval(l);
-    push_stack_frame(Qnil, Qnil, Qnil);
-    for (size_t i = 0; i < 100; ++i) {
-        Fcons(MAKE_FIXNUM(0x1234), LISP_LITSTR("a"));
-    }
-    pop_stack_frame();
    lisp_gc_now(&gc_stats);
    debug_print_gc_stats(stdout, &gc_stats);
    pop_stack_frame();