diff options
Diffstat (limited to 'src/main.c')
| -rw-r--r-- | src/main.c | 25 |
1 files changed, 13 insertions, 12 deletions
@@ -8,18 +8,19 @@ int main(int argc, char **argv) { pit_runtime *rt = pit_runtime_new(); - if (argc < 2) { // run repl + if (argc < 2) { /* run repl */ + char buf[1024] = {0}; + i64 len = 0; pit_runtime_freeze(rt); setbuf(stdout, NULL); printf("> "); - char buf[1024] = {0}; - i64 len = 0; - while (len < (i64) sizeof(buf) && (buf[len++] = getchar()) != EOF) { + while (len < (i64) sizeof(buf) && (buf[len++] = (char) getchar()) != EOF) { if (buf[len - 1] == '\n') { + pit_value bs, prog, res; buf[len - 1] = 0; - pit_value bs = pit_bytes_new_cstr(rt, buf); - pit_value prog = pit_read_bytes(rt, bs); - pit_value res = pit_eval(rt, prog); + bs = pit_bytes_new_cstr(rt, buf); + prog = pit_read_bytes(rt, bs); + res = pit_eval(rt, prog); if (pit_runtime_print_error(rt)) { rt->error = PIT_NIL; printf("> "); @@ -31,16 +32,16 @@ int main(int argc, char **argv) { len = 0; } } - } else { // run file + } else { /* run file */ pit_value bs = pit_bytes_new_file(rt, argv[1]); pit_lexer lex; + pit_parser parse; + bool eof = false; + pit_value p = PIT_NIL; if (!pit_lexer_from_bytes(rt, &lex, bs)) { pit_error(rt, "failed to initialize lexer"); } - pit_parser parse; pit_parser_from_lexer(&parse, &lex); - bool eof = false; - pit_value p = PIT_NIL; while (p = pit_parse(rt, &parse, &eof), !eof) { pit_eval(rt, p); if (pit_runtime_print_error(rt)) { @@ -48,5 +49,5 @@ int main(int argc, char **argv) { } } } - + return 0; } |