diff options
author | Kaz Kyheku <kaz@kylheku.com> | 2020-01-29 05:34:05 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2020-01-29 05:34:05 -0800 |
commit | 538d49761802f6da3ce005f9293c8d74b5eb0f57 (patch) | |
tree | 0f3ce6c75b414915eea2c7a6e9a8a76661724c96 /eval.c | |
parent | 4491cf924ada98bc939e51d18ec81751cac0f5f2 (diff) | |
download | txr-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.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -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)); |