diff options
author | Keith Packard <keithp@keithp.com> | 2016-11-02 14:18:54 -0700 |
---|---|---|
committer | Keith Packard <keithp@keithp.com> | 2016-11-17 22:18:39 -0800 |
commit | d134a38c57429070ee5d4f74dafca4489e4b1443 (patch) | |
tree | f95eb5c657849f0831f0b4695c7dfe674422c453 /src/lisp/ao_lisp_rep.c | |
parent | d92f8ca0d279ce6968bafefe4cd265e80e55123f (diff) |
altos/lisp: add set/setq and ' in reader
Along with other small fixes
Signed-off-by: Keith Packard <keithp@keithp.com>
Diffstat (limited to 'src/lisp/ao_lisp_rep.c')
-rw-r--r-- | src/lisp/ao_lisp_rep.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lisp/ao_lisp_rep.c b/src/lisp/ao_lisp_rep.c index d26d270c..a1f9fa1f 100644 --- a/src/lisp/ao_lisp_rep.c +++ b/src/lisp/ao_lisp_rep.c @@ -22,6 +22,7 @@ ao_lisp_read_eval_print(void) in = ao_lisp_read(); if (!in) break; +// printf ("in: "); ao_lisp_poly_print(in); printf("\n"); out = ao_lisp_eval(in); if (ao_lisp_exception) { if (ao_lisp_exception & AO_LISP_OOM) |