boot2.lisp 641 Bytes
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
;;;
;;; Bootstrap file 2 of 2 for moving LISP:CLASS and assorted functions
;;; and types to KERNEL, so that they are freed for use by PCL.
;;;
;;; Use this file as bootstrap.lisp, using Pierre Mai's build scripts,
;;; to compile the final Lisp with the cross-compiled Lisp that resulted
;;; from using the first bootstrap file in this series.
;;;

(in-package "USER")

;;;
;;; Otherwise PCL barfs when it is built, because it defines generic
;;; functions with the same names.  The functions are still there
;;; in the compiling Lisp for bootstrapping reasons.
;;;
(fmakunbound 'class-name)
(fmakunbound '(setf class-name))

;;; end of file