From cf5348a6c93cc6290985226b02abbf775992e80d Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Sat, 15 May 2004 18:44:40 +0000 Subject: [PATCH] The extra args to make-package are keyword args, not optional args --- ansi-tests/sxhash.lsp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ansi-tests/sxhash.lsp b/ansi-tests/sxhash.lsp index 823424c9..e2198d27 100644 --- a/ansi-tests/sxhash.lsp +++ b/ansi-tests/sxhash.lsp @@ -124,13 +124,13 @@ for package = (find-package name) unless package do (return name))) (sx1 - (let* ((package (make-package package-name nil nil)) + (let* ((package (make-package package-name :nicknames nil :use nil)) (symbol (intern "FOO" package))) (prog1 (sxhash symbol) (delete-package package)))) (sx2 - (let* ((package (make-package package-name nil nil)) + (let* ((package (make-package package-name :nicknames nil :use nil)) (symbol (intern "FOO" package))) (prog1 (sxhash symbol) -- GitLab