Global generation

2026-01-18 03:11:17 -08:00
parent 94d5749d31
commit c0b18cda5a
16 changed files with 571 additions and 57 deletions
@@ -6,14 +6,10 @@
 int main(int argc, const char **argv) {
    lisp_init();
    ReadStream s;
-    const char BUF[] = "`(1 . ,2)";
+    const char BUF[] = "t";
    read_stream_init(&s, BUF, sizeof(BUF) - 1);
    LispVal *l = read(&s);
-    if (!l) {
-        printf("EOF\n");
-    } else {
-        debug_obj_info(stdout, l);
-    }
+    printf("%d\n", l == Qt);
    lisp_shutdown();
    return 0;
 }