summaryrefslogtreecommitdiff
path: root/src/lisp/ao_lisp_rep.c
diff options
context:
space:
mode:
authorKeith Packard <keithp@keithp.com>2016-11-02 14:18:54 -0700
committerKeith Packard <keithp@keithp.com>2016-11-17 22:18:39 -0800
commitd134a38c57429070ee5d4f74dafca4489e4b1443 (patch)
treef95eb5c657849f0831f0b4695c7dfe674422c453 /src/lisp/ao_lisp_rep.c
parentd92f8ca0d279ce6968bafefe4cd265e80e55123f (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.c1
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)