diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2022-10-13 06:57:48 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2022-10-13 06:57:48 -0700 |
commit | ae644e2046349d2fdb83da88a33bedb565b99dce (patch) | |
tree | 89b837c6b5cf2e645d20b05731e85186a72050d0 /eval.c | |
parent | 3c4bf5fa931c0620473efe8530ed2de786292af5 (diff) | |
download | txr-ae644e2046349d2fdb83da88a33bedb565b99dce.tar.gz txr-ae644e2046349d2fdb83da88a33bedb565b99dce.tar.bz2 txr-ae644e2046349d2fdb83da88a33bedb565b99dce.zip |
New function: macroexpand-params.
* stdlib/pmac.tl (macroexpand-params): New function,
implemented using newly exposed sys:expand-param-macro.
* autoload.c (pmac_set_entries): Trigger pmac.tl autload
on macroexpand-params symbol.
* eval.c (eval_init): Register existing expand_param_macro
function as sys:expand-param-macro.
* txr.1: Documented.
* stdlib/doc-syms.tl: Updated.
Diffstat (limited to 'eval.c')
-rw-r--r-- | eval.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -7107,6 +7107,7 @@ void eval_init(void) reg_fun(intern(lit("macroexpand-lisp1"), user_package), func_n2o(macroexpand_lisp1, 1)); reg_fun(intern(lit("expand-params"), system_package), func_n5(expand_params)); + reg_fun(intern(lit("expand-param-macro"), system_package), func_n4(expand_param_macro)); reg_fun(intern(lit("constantp"), user_package), func_n2o(constantp, 1)); reg_fun(intern(lit("make-env"), user_package), func_n3o(make_env_intrinsic, 0)); reg_fun(intern(lit("env-fbind"), user_package), func_n3(env_fbind)); |