Fix REPL output
This commit is contained in:
parent
2c20ba5127
commit
b2acf41393
18
src/main.c
18
src/main.c
|
@ -89,9 +89,21 @@ void repl(struct Object *const environment)
|
|||
printf("=> ");
|
||||
syntax_repl(
|
||||
Object_build_list(
|
||||
2,
|
||||
Object_new_symbol("displayln"),
|
||||
Object_build_list(2, Object_new_symbol("quote"), result)
|
||||
3,
|
||||
Object_new_symbol("begin"),
|
||||
Object_build_list(
|
||||
2,
|
||||
Object_new_symbol("display"),
|
||||
Object_build_list(
|
||||
2,
|
||||
Object_new_symbol("quote"),
|
||||
result
|
||||
)
|
||||
),
|
||||
Object_build_list(
|
||||
1,
|
||||
Object_new_symbol("newline")
|
||||
)
|
||||
),
|
||||
environment
|
||||
);
|
||||
|
|
Loading…
Reference in New Issue