diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2015-11-30 07:17:35 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2015-11-30 07:17:35 -0800 |
commit | 4acf4217af8e9c830f89e8586e5ec62e97cb85b0 (patch) | |
tree | 9973d4761a402f5ba6fa66a70c4e57243fe104cd /eval.h | |
parent | e557f0f806badf93b36b2bf519a73830b67cf564 (diff) | |
download | txr-4acf4217af8e9c830f89e8586e5ec62e97cb85b0.tar.gz txr-4acf4217af8e9c830f89e8586e5ec62e97cb85b0.tar.bz2 txr-4acf4217af8e9c830f89e8586e5ec62e97cb85b0.zip |
Drop ctx_form param on env_vbind_special and apply.
* eval.c (env_vbind_special): Remove unused ctx_form
parameter.
(bind_args, bind_macro_params): Don't pass ctx_form to
env_vbind_special.
(apply): Remove unused ctx_form parameter.
(apply_intrinsic, applyv, mapcarv, mappendv,
lazy_mapcarv_func, mapdov, do_mapf): Don't pass nil third
argument to apply.
* eval.h (apply): Declaration updated.
* lib.c (do_juxt): Do not bind third argument of apply
to lin when currying; curry as two argument function.
(do_not): Do not pass third nil argument to apply.
Diffstat (limited to 'eval.h')
-rw-r--r-- | eval.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -52,7 +52,7 @@ val func_get_name(val fun, val env); void reg_varl(val sym, val val); void reg_var(val sym, val val); void reg_fun(val sym, val fun); -val apply(val fun, val arglist, val ctx_form); +val apply(val fun, val arglist); val apply_intrinsic(val fun, val args); val eval_progn(val forms, val env, val ctx_form); val eval(val form, val env, val ctx_form); |