diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2014-01-10 20:11:38 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2014-01-10 20:11:38 -0800 |
commit | ba9a6aade4adf32b4361aa8db8b156fdb40e2cd5 (patch) | |
tree | 1a1d2ea421fff889e2ef6aff99c5d1ecd1846dd0 /eval.c | |
parent | f4bd17eab2667962090fc8a918b553badad671bc (diff) | |
download | txr-ba9a6aade4adf32b4361aa8db8b156fdb40e2cd5.tar.gz txr-ba9a6aade4adf32b4361aa8db8b156fdb40e2cd5.tar.bz2 txr-ba9a6aade4adf32b4361aa8db8b156fdb40e2cd5.zip |
* eval.c (eval_init): Renaming lisp-parse to read; lisp-parse
is retained as an obsolescent synonym. All arguments become optional.
* parser.l (lisp_parse): Handle nil source.
* txr.1: Updated.
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -2411,7 +2411,8 @@ void eval_init(void) reg_fun(intern(lit("hash-isec"), user_package), func_n2(hash_isec)); reg_fun(intern(lit("eval"), user_package), func_n2o(eval_intrinsic, 1)); - reg_fun(intern(lit("lisp-parse"), user_package), func_n2o(lisp_parse, 1)); + reg_fun(intern(lit("lisp-parse"), user_package), func_n2o(lisp_parse, 0)); + reg_fun(intern(lit("read"), user_package), func_n2o(lisp_parse, 0)); reg_fun(intern(lit("chain"), user_package), func_n0v(chainv)); reg_fun(intern(lit("andf"), user_package), func_n0v(andv)); |