Very close to a basic REPL now.

This commit is contained in:
Simon Brooke 2026-04-16 22:28:35 +01:00
parent 83537391a6
commit 4efe9eab87
23 changed files with 188 additions and 84 deletions

View file

@ -1526,7 +1526,7 @@ struct cons_pointer lisp_repl( struct stack_frame *frame,
struct cons_pointer prompt = c_assoc( prompt_name, new_env );
if ( !nilp( prompt ) ) {
print( os, prompt );
c_print( os, prompt );
}
expr = lisp_read( get_stack_frame( frame_pointer ), frame_pointer,
@ -1541,7 +1541,7 @@ struct cons_pointer lisp_repl( struct stack_frame *frame,
println( os );
print( os, eval_form( frame, frame_pointer, expr, new_env ) );
c_print( os, eval_form( frame, frame_pointer, expr, new_env ) );
dec_ref( expr );
}