From 043113ebdb4c5efc7c2ddaf18c81110f03ff391c Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Tue, 28 May 1991 17:27:20 +0000 Subject: [PATCH] Deleted spurious CHECK-TYPE in RENAME-PACKAGE. --- code/package.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/code/package.lisp b/code/package.lisp index 9c8c940f1..050f76c6f 100644 --- a/code/package.lisp +++ b/code/package.lisp @@ -7,7 +7,7 @@ ;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; (ext:file-comment - "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/package.lisp,v 1.11 1991/03/13 00:21:54 wlott Exp $") + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/package.lisp,v 1.12 1991/05/28 17:27:20 ram Exp $") ;;; ;;; ********************************************************************** ;;; @@ -824,7 +824,6 @@ ;;; (defun rename-package (package name &optional (nicknames ())) "Changes the name and nicknames for a package." - (check-type package package) (let* ((package (package-or-lose package)) (name (string name)) (found (find-package name))) -- GitLab