From 811f11463851a0f35835ac72ef09b65b1072de20 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Thu, 25 Sep 2025 20:05:19 -0400 Subject: Add runtime freezing, add defun and defmacro --- src/main.c | 26 +++++++------------------- 1 file changed, 7 insertions(+), 19 deletions(-) (limited to 'src/main.c') diff --git a/src/main.c b/src/main.c index c056270..071cf7e 100644 --- a/src/main.c +++ b/src/main.c @@ -12,25 +12,13 @@ int main(int argc, char **argv) { pit_check_error_maybe_panic(rt); pit_lexer *lex = pit_lex_file(argv[1]); - - printf("checking parse...\n"); pit_parser *parse = pit_parser_from_lexer(lex); - pit_value program = pit_parse(rt, parse); - pit_check_error_maybe_panic(rt); - pit_trace(rt, program); - - printf("checking macro expansion...\n"); - pit_value expanded = pit_expand_macros(rt, program); - pit_check_error_maybe_panic(rt); - pit_trace(rt, expanded); - printf("checking free variables...\n"); - pit_value freevars = pit_free_vars(rt, PIT_NIL, expanded); - pit_check_error_maybe_panic(rt); - pit_trace(rt, freevars); - - printf("checking eval...\n"); - pit_value ret = pit_eval(rt, program); - pit_check_error_maybe_panic(rt); - pit_trace(rt, ret); + bool eof = false; + while (!eof) { + pit_value program = pit_parse(rt, parse, &eof); + pit_check_error_maybe_panic(rt); + pit_eval(rt, program); + pit_check_error_maybe_panic(rt); + } } -- cgit v1.2.3