repl: slight refactoring
This commit is contained in:
parent
a529cf262e
commit
bbdd17885c
48
repl.c
48
repl.c
|
@ -21,6 +21,27 @@
|
||||||
#include <readline/readline.h>
|
#include <readline/readline.h>
|
||||||
#include <readline/history.h>
|
#include <readline/history.h>
|
||||||
|
|
||||||
|
static void
|
||||||
|
run (struct context *ctx, struct item *program) {
|
||||||
|
struct item *result = NULL;
|
||||||
|
(void) execute (ctx, program, &result);
|
||||||
|
item_free_list (program);
|
||||||
|
|
||||||
|
const char *failure = ctx->error;
|
||||||
|
if (ctx->memory_failure)
|
||||||
|
failure = "memory allocation failure";
|
||||||
|
if (failure) {
|
||||||
|
printf ("\x1b[31m%s: %s\x1b[0m\n", "runtime error", failure);
|
||||||
|
free (ctx->error);
|
||||||
|
ctx->error = NULL;
|
||||||
|
ctx->memory_failure = false;
|
||||||
|
} else {
|
||||||
|
print_tree (result, 0);
|
||||||
|
putchar ('\n');
|
||||||
|
item_free_list (result);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
int
|
int
|
||||||
main (int argc, char *argv[]) {
|
main (int argc, char *argv[]) {
|
||||||
(void) argc;
|
(void) argc;
|
||||||
|
@ -43,31 +64,14 @@ main (int argc, char *argv[]) {
|
||||||
const char *e = NULL;
|
const char *e = NULL;
|
||||||
struct item *program = parser_run (&parser, &e);
|
struct item *program = parser_run (&parser, &e);
|
||||||
free (line);
|
free (line);
|
||||||
if (e) {
|
if (e)
|
||||||
printf ("\x1b[31m%s: %s\x1b[0m\n", "parse error", e);
|
printf ("\x1b[31m%s: %s\x1b[0m\n", "parse error", e);
|
||||||
parser_free (&parser);
|
else
|
||||||
continue;
|
run (&ctx, program);
|
||||||
}
|
|
||||||
parser_free (&parser);
|
parser_free (&parser);
|
||||||
|
|
||||||
struct item *result = NULL;
|
|
||||||
(void) execute (&ctx, program, &result);
|
|
||||||
item_free_list (program);
|
|
||||||
|
|
||||||
const char *failure = ctx.error;
|
|
||||||
if (ctx.memory_failure)
|
|
||||||
failure = "memory allocation failure";
|
|
||||||
if (failure) {
|
|
||||||
printf ("\x1b[31m%s: %s\x1b[0m\n", "runtime error", failure);
|
|
||||||
free (ctx.error);
|
|
||||||
ctx.error = NULL;
|
|
||||||
ctx.memory_failure = false;
|
|
||||||
} else {
|
|
||||||
print_tree (result, 0);
|
|
||||||
putchar ('\n');
|
|
||||||
item_free_list (result);
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
|
||||||
|
putchar ('\n');
|
||||||
context_free (&ctx);
|
context_free (&ctx);
|
||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in New Issue