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