summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kyheku <kaz@kylheku.com>2020-01-29 05:34:05 -0800
committerKaz Kylheku <kaz@kylheku.com>2020-01-29 05:34:05 -0800
commit538d49761802f6da3ce005f9293c8d74b5eb0f57 (patch)
tree0f3ce6c75b414915eea2c7a6e9a8a76661724c96 /eval.c
parent4491cf924ada98bc939e51d18ec81751cac0f5f2 (diff)
downloadtxr-538d49761802f6da3ce005f9293c8d74b5eb0f57.tar.gz
txr-538d49761802f6da3ce005f9293c8d74b5eb0f57.tar.bz2
txr-538d49761802f6da3ce005f9293c8d74b5eb0f57.zip
packages: no default argument in several functions.
* eval.c (eval_init): bugfix: for the functions package-symbols, package-local-symbols and package-foreign-symbols, make the package parameter optional, as is specified in the documentation.
Diffstat (limited to 'eval.c')
-rw-r--r--eval.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/eval.c b/eval.c
index 000a541b..c43dcb32 100644
--- a/eval.c
+++ b/eval.c
@@ -6673,9 +6673,9 @@ void eval_init(void)
reg_fun(intern(lit("merge-delete-package"), user_package), func_n2o(merge_delete_package, 1));
reg_fun(intern(lit("package-alist"), user_package), func_n0(package_alist));
reg_fun(intern(lit("package-name"), user_package), func_n1(package_name));
- reg_fun(intern(lit("package-symbols"), user_package), func_n1(package_symbols));
- reg_fun(intern(lit("package-local-symbols"), user_package), func_n1(package_local_symbols));
- reg_fun(intern(lit("package-foreign-symbols"), user_package), func_n1(package_foreign_symbols));
+ reg_fun(intern(lit("package-symbols"), user_package), func_n1o(package_symbols, 0));
+ reg_fun(intern(lit("package-local-symbols"), user_package), func_n1o(package_local_symbols, 0));
+ reg_fun(intern(lit("package-foreign-symbols"), user_package), func_n1o(package_foreign_symbols, 0));
reg_fun(intern(lit("use-sym"), user_package), func_n2o(use_sym, 1));
reg_fun(intern(lit("unuse-sym"), user_package), func_n2o(unuse_sym, 1));
reg_fun(intern(lit("use-package"), user_package), func_n2o(use_package, 1));