summaryrefslogtreecommitdiffstats
path: root/lib.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2014-09-02 19:46:18 -0700
committerKaz Kylheku <kaz@kylheku.com>2014-09-02 19:46:18 -0700
commit1572c93478c55ff14738a4b6f1b38dc41878a816 (patch)
tree3d02c3c2ab4c76af0ae6ce7f049edfa64405d04c /lib.h
parent0207bdeab644efddce25225c7344aabfb6d73f1f (diff)
downloadtxr-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.h2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib.h b/lib.h
index 63d3fbd5..8ec7ddb9 100644
--- a/lib.h
+++ b/lib.h
@@ -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)))