From fccdc92d4be229ed88c3db366cf9e44a0664abaa Mon Sep 17 00:00:00 2001 From: gerd <gerd> Date: Thu, 3 Apr 2003 11:40:06 +0000 Subject: [PATCH] * pcl/pclload.lisp ("PCL"): Remove references to the slot-accessor-name package. --- pcl/pclload.lisp | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/pcl/pclload.lisp b/pcl/pclload.lisp index a4d434397..5cfe91c0a 100644 --- a/pcl/pclload.lisp +++ b/pcl/pclload.lisp @@ -1,12 +1,8 @@ (in-package "PCL") -(unless (find-package "SLOT-ACCESSOR-NAME") - (make-package "SLOT-ACCESSOR-NAME" :use nil)) (rename-package "PCL" "PCL" '("OLD-PCL")) -(rename-package "SLOT-ACCESSOR-NAME" "SLOT-ACCESSOR-NAME" - '("OLD-SLOT-ACCESSOR-NAME")) (import 'kernel:funcallable-instance-p) (load "target:pcl/defsys") (load-pcl) (rename-package "PCL" "PCL" '()) -(rename-package "SLOT-ACCESSOR-NAME" "SLOT-ACCESSOR-NAME" '()) + -- GitLab