From 7a3dd48161181e84c2dae473586781c2c55d27d7 Mon Sep 17 00:00:00 2001 From: Stas Boukarev Date: Fri, 6 Sep 2013 21:58:24 +0400 Subject: [PATCH] Remove a wrong IGNORE declaration. An incorrect ignore declaration was used with #!-sb-package-locks, even though the ignored variables are used without sb-package-locks too. Patch by Douglas Katzman. --- src/code/defpackage.lisp | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/code/defpackage.lisp b/src/code/defpackage.lisp index ae4d051..58600c4 100644 --- a/src/code/defpackage.lisp +++ b/src/code/defpackage.lisp @@ -387,9 +387,7 @@ specifies to signal a warning if SWANK package is in variance, and an error othe (type list nicknames shadows shadowing-imports imports interns exports) (type (or list (member :default)) use) - (type (or simple-string null) doc-string) - #!-sb-package-locks - (ignore implement lock)) + (type (or simple-string null) doc-string)) (with-package-graph () (let* ((existing-package (find-package name)) (use (use-list-packages existing-package use)) -- 1.7.10.4