diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2014-09-02 19:46:18 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2014-09-02 19:46:18 -0700 |
commit | 1572c93478c55ff14738a4b6f1b38dc41878a816 (patch) | |
tree | 3d02c3c2ab4c76af0ae6ce7f049edfa64405d04c /lib.h | |
parent | 0207bdeab644efddce25225c7344aabfb6d73f1f (diff) | |
download | txr-1572c93478c55ff14738a4b6f1b38dc41878a816.tar.gz txr-1572c93478c55ff14738a4b6f1b38dc41878a816.tar.bz2 txr-1572c93478c55ff14738a4b6f1b38dc41878a816.zip |
* eval.c (eval_init): Update registration of lisp-parse and read
to account for new parameter.
* lib.c (syntax_error_s): New symbol_variable.
(obj_init): New symbol variable initialized.
* lib.h (syntax_error_s): Declared.
* parser.h (lisp_parse): Declaration updated.
* parser.l (lisp_parse): Takes third parameter.
* txr.1: Third parameter of read described.
* txr.c (txr_main): Pass colon_k to third parameter of lisp_parse
to obtain exception throwing behavior.
* unwind.c (uw_init): Register syntax-error as subtype of error.
Diffstat (limited to 'lib.h')
-rw-r--r-- | lib.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -367,7 +367,7 @@ extern val try_s, catch_s, finally_s, throw_s, defex_s, deffilter_s; extern val eof_s, eol_s, assert_s; extern val error_s, type_error_s, internal_error_s; extern val numeric_error_s, range_error_s; -extern val query_error_s, file_error_s, process_error_s; +extern val query_error_s, file_error_s, process_error_s, syntax_error_s; extern val gensym_counter_s; #define gensym_counter (deref(lookup_var_l(nil, gensym_counter_s))) |