From d5fb9d56c6a9d977325334a78f69b6fb40929d0c Mon Sep 17 00:00:00 2001 From: Raymond Toy <toy.raymond@gmail.com> Date: Sun, 2 Nov 2014 08:44:35 -0800 Subject: [PATCH] Remove the LOOP package. There are no symbols in it anyway. Apparently this is from old-loop.lisp, which isn't used anymore. --- src/code/exports.lisp | 5 ----- 1 file changed, 5 deletions(-) diff --git a/src/code/exports.lisp b/src/code/exports.lisp index d3c8fa7fb..455894cc7 100644 --- a/src/code/exports.lisp +++ b/src/code/exports.lisp @@ -94,9 +94,6 @@ (if (find-package "EXTENSIONS") (rename-package "EXTENSIONS" "EXTENSIONS" '("EXT")) (make-package "EXTENSIONS" :nicknames '("EXT") :use nil)) -(if (find-package "LOOP") - (rename-package "LOOP" "LOOP" 'nil) - (make-package "LOOP" :nicknames 'nil :use nil)) (if (find-package "DEBUG-INTERNALS") (rename-package "DEBUG-INTERNALS" "DEBUG-INTERNALS" '("DI")) (make-package "DEBUG-INTERNALS" :nicknames '("DI") :use nil)) @@ -151,7 +148,6 @@ (use-package '("LISP") "DISASSEM") (use-package '("EXTENSIONS" "LISP" "SYSTEM") "DEBUG") (use-package '("C-CALL" "ALIEN" "COMMON-LISP" "SYSTEM") "EXTENSIONS") -(use-package '("LISP") "LOOP") (use-package '("LISP" "SYSTEM" "EXTENSIONS" "KERNEL") "DEBUG-INTERNALS") (use-package '("ALIEN-INTERNALS" "ALIEN" "COMMON-LISP" "EXTENSIONS" "KERNEL" @@ -1608,7 +1604,6 @@ "LIST-ALL-EXTERNAL-FORMATS" "DESCRIBE-EXTERNAL-FORMAT")) -(defpackage "LOOP") (dolist (name '("DEBUG-SOURCE" "DEBUG-SOURCE-COMPILED" "DEBUG-SOURCE-CREATED" -- GitLab