- (in-package "COMMON-LISP")
-
- ;; no longer needed in CLISP 1999-01-08, hurrah!
- #|
- ;; ANSI specifies that package LISP defines the type BOOLEAN, and the CMU CL
- ;; compiler uses it a lot. This should be trivial to patch in CLISP, except
- ;; that CLISP defines FFI:BOOLEAN, which conflicts. Gads.. Here we try to fix
- ;; it with some package hacking. (Please do not take this as an example of
- ;; good package hacking, I just messed with it until it seemed to work well
- ;; enough to bootstrap CMU CL, because I'm highly unmotivated to make elegant
- ;; fixes for nonstandard behavior. -- WHN)
- (shadow 'ffi:boolean "FFI")
- (deftype cl::boolean () '(member t nil))
- (export 'boolean "LISP")
- |#
-
- ;; I gave up on using CLISP-1999-01-08 as a cross-compilation host because of
- ;; problems that I don't have workarounds for:
- (error "can't use CLISP -- no MAKE-LOAD-FORM")
- (error "can't use CLISP -- no (FUNCTION (SETF SYMBOL-FUNCTION))")
- )
-
-;;; CMU CL, at least as of 18b, doesn't support PRINT-OBJECT. In particular, it
-;;; refuses to compile :PRINT-OBJECT options to DEFSTRUCT, so we need to
-;;; conditionalize such options on the :NO-ANSI-PRINT-OBJECT feature in order
-;;; to get the code to compile. (It also fails to do anything useful with
-;;; DEFMETHOD PRINT-OBJECT, but that doesn't matter much, since it doesn't stop
-;;; the cross-compiler from working.)
-;;;
-;;; FIXME: SBCL 0.5.0 doesn't support PRINT-OBJECT either. SBCL 0.6.0 will,
-;;; at which time this conditional should go away.
+;;; CMU CL, at least as of 18b, doesn't support PRINT-OBJECT. In
+;;; particular, it refuses to compile :PRINT-OBJECT options to
+;;; DEFSTRUCT, so we need to conditionalize such options on the
+;;; :NO-ANSI-PRINT-OBJECT feature in order to get the code to compile.
+;;; (It also fails to do anything useful with DEFMETHOD PRINT-OBJECT,
+;;; but that doesn't matter much, since it doesn't stop the
+;;; cross-compiler from working.)