Provide a way to get out of a lisp read-eval-print loop that can be
easily input from the keyboard.
Signed-off-by: Keith Packard <keithp@keithp.com>
ao_poly in, out = AO_LISP_NIL;
for(;;) {
in = ao_lisp_read();
ao_poly in, out = AO_LISP_NIL;
for(;;) {
in = ao_lisp_read();
- if (in == _ao_lisp_atom_eof)
+ if (in == _ao_lisp_atom_eof || in == AO_LISP_NIL)
break;
out = ao_lisp_eval(in);
if (ao_lisp_exception) {
break;
out = ao_lisp_eval(in);
if (ao_lisp_exception) {