summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2014-01-10 20:11:38 -0800
committerKaz Kylheku <kaz@kylheku.com>2014-01-10 20:11:38 -0800
commitba9a6aade4adf32b4361aa8db8b156fdb40e2cd5 (patch)
tree1a1d2ea421fff889e2ef6aff99c5d1ecd1846dd0 /eval.c
parentf4bd17eab2667962090fc8a918b553badad671bc (diff)
downloadtxr-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.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/eval.c b/eval.c
index 25a6c0be..b8e2155c 100644
--- a/eval.c
+++ b/eval.c
@@ -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));