diff options
| author | Keith Packard <keithp@keithp.com> | 2016-11-03 21:49:50 -0700 |
|---|---|---|
| committer | Keith Packard <keithp@keithp.com> | 2016-11-17 22:18:39 -0800 |
| commit | 9fe33ce12f30da223e3ef83dfe12afaa751d509d (patch) | |
| tree | 72799eb7e57a994d3ecfe510979e10bf3e9fd7b9 /src/lisp/ao_lisp_rep.c | |
| parent | 71bf5774083e7f0d87ea609a73d6cfb7f60de9d9 (diff) | |
altos: Add lambda support to lisp
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 | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/src/lisp/ao_lisp_rep.c b/src/lisp/ao_lisp_rep.c index a1f9fa1f..d780186a 100644 --- a/src/lisp/ao_lisp_rep.c +++ b/src/lisp/ao_lisp_rep.c @@ -25,12 +25,6 @@ ao_lisp_read_eval_print(void) // 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) - printf("out of memory\n"); - if (ao_lisp_exception & AO_LISP_DIVIDE_BY_ZERO) - printf("divide by zero\n"); - if (ao_lisp_exception & AO_LISP_INVALID) - printf("invalid operation\n"); ao_lisp_exception = 0; } else { ao_lisp_poly_print(out); |