X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Ftarget-package.lisp;h=c8f67568b4ee36658b2d664c109038ef64d9dc60;hb=d147d512602d761a2dcdfded506dd1a8f9a140dc;hp=4bf4b3f12fac1f677486ac8cd7cc26baf56b8ff2;hpb=ce02ab2ecd9c6ae2e570abd8c93ebf3be55bbdad;p=sbcl.git diff --git a/src/code/target-package.lisp b/src/code/target-package.lisp index 4bf4b3f..c8f6756 100644 --- a/src/code/target-package.lisp +++ b/src/code/target-package.lisp @@ -959,7 +959,7 @@ ;; nicknames that we don't want in our target SBCL. For that reason, ;; we handle it specially, not dumping the host Lisp version at ;; genesis time.. - (assert (not (find-package "COMMON-LISP-USER"))) + (aver (not (find-package "COMMON-LISP-USER"))) ;; ..but instead making our own from scratch here. (/show0 "about to MAKE-PACKAGE COMMON-LISP-USER") (make-package "COMMON-LISP-USER"