From 538d49761802f6da3ce005f9293c8d74b5eb0f57 Mon Sep 17 00:00:00 2001 From: Kaz Kyheku Date: Wed, 29 Jan 2020 05:34:05 -0800 Subject: 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. --- eval.c | 6 +++--- 1 file 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)); -- cgit v1.2.3