Use declaim instead of proclaim.

Pascal J. Bourguignon [2014-10-10 02:00]
Use declaim instead of proclaim.
Filename
minimal-compiler-system.lisp
diff --git a/minimal-compiler-system.lisp b/minimal-compiler-system.lisp
index 6f0db05..e57b222 100644
--- a/minimal-compiler-system.lisp
+++ b/minimal-compiler-system.lisp
@@ -34,11 +34,8 @@
 ;;;;    Software Foundation, Inc., 59 Temple Place, Suite 330,
 ;;;;    Boston, MA 02111-1307 USA
 ;;;;**************************************************************************
-
 (in-package "MINIMAL-COMPILER-SYSTEM")
-
-(proclaim '(declaration constant)) ; we declaim constant variables as being mcsys:constant.
-
+(declaim (declaration constant)) ; we declaim constant variables as being mcsys:constant.


 (defun note-type (type-name)
@@ -87,9 +84,9 @@


 (define-condition package-error-package-not-found (package-error) ())
-(define-condition PACKAGE-ERROR-SYMBOL-NOT-FOUND  (package-error)
+(define-condition package-error-symbol-not-found  (package-error)
   ((symbol-name :initarg :symbol-name
-                :accessor PACKAGE-ERROR-SYMBOL-NOT-FOUND-symbol-name)))
+                :accessor package-error-symbol-not-found-symbol-name)))


ViewGit