$ pwd
/home/gilbert
$ ./tailor-cmucl
; Loading #p"/home/gilbert/.cmucl-init.lisp".
;; Loading #p"/home/gilbert/cmucl/2003-05-30/lib/cmucl/lib/subsystems/gray-streams-library.x86f".
;; Loading #p"/home/gilbert/cmucl/2003-05-30/lib/cmucl/lib/subsystems/clx-library.x86f".

; Python version 1.1, VM version Intel x86 on 31 MAY 03 07:49:05 pm.
; Compiling: /home/gilbert/emacs/ilisp-20021222/ilisp-pkg.lisp 16 SEP 02 04:14:51 am


; home:emacs/ilisp-20021222/ilisp-pkg.x86f written.
; Compilation finished in 0:00:00.
;; Loading #p"/home/gilbert/emacs/ilisp-20021222/ilisp-pkg.x86f".

; Python version 1.1, VM version Intel x86 on 31 MAY 03 07:49:05 pm.
; Compiling: /home/gilbert/lisp/meta-dot/cmucl-meta-dot.lisp 22 MAY 03 02:42:45 pm

; Converted PARSE-DEFMETHOD.
; Compiling DEFUN PARSE-DEFMETHOD: 
; Converted PARSE-DEFMETHOD-ARGS.
; Compiling DEFUN PARSE-DEFMETHOD-ARGS: 
; Converted PATTERNFY.
; Compiling DEFUN PATTERNFY: 
; Converted REGEXP-QUOTE.
; Compiling DEFUN REGEXP-QUOTE: 
; Compiling Load Time Value of (PCL::ENSURE-ACCESSOR 'PCL::READER
                                         '(PCL:SLOT-ACCESSOR :GLOBAL
                                           PCL::SOURCE ...)
                                         ...): 
; Compiling Load Time Value of (PCL::ENSURE-ACCESSOR 'PCL::READER
                                         '(PCL:SLOT-ACCESSOR :GLOBAL
                                           PCL::SOURCE ...)
                                         ...): 
; Compiling DEFMETHOD SOURCE-MATCH-PATTERN (STANDARD-METHOD): 
; Byte Compiling Top-Level Form: 
; Compiling Load Time Value of (PCL::ENSURE-ACCESSOR 'PCL::READER
                                         '(PCL:SLOT-ACCESSOR :GLOBAL
                                           PCL::SOURCE ...)
                                         ...): 
; Compiling DEFMETHOD SOURCE-MATCH-PATTERN (PCL:STANDARD-READER-METHOD): 
; Compiling DEFMETHOD SOURCE-MATCH-PATTERN (FUNCTION): 
; Converted MACRO-FUNCTION-SOURCE-MATCH-PATTERN.
; Compiling DEFUN MACRO-FUNCTION-SOURCE-MATCH-PATTERN: 
; Converted GET-SIMPLE-SOURCE-INFO.
; Compiling DEFUN GET-SIMPLE-SOURCE-INFO: 
; Converted ILISP::SOURCE-FILE-2.
; Compiling DEFUN ILISP::SOURCE-FILE-2: 
; Converted SOURCE-FILE-2-GFUN.
; Compiling DEFUN SOURCE-FILE-2-GFUN: 
; Byte Compiling Top-Level Form: 

; 
; 
; File: /home/gilbert/lisp/meta-dot/cmucl-meta-dot.lisp

; In: DEFUN GET-SIMPLE-SOURCE-INFO

;   (ILISP::FUN-DEFINED-FROM-PATHNAME FUN)
; Warning: Undefined function ILISP::FUN-DEFINED-FROM-PATHNAME Eh?
; ; 

; Warning: This function is undefined:
;   ILISP::FUN-DEFINED-FROM-PATHNAME
; 

; Compilation unit finished.
;   2 warnings


; home:lisp/meta-dot/cmucl-meta-dot.x86f written.
; Compilation finished in 0:00:01.
;; Loading #p"/home/gilbert/lisp/meta-dot/cmucl-meta-dot.x86f".
;; Loading #p"/home/gilbert/lisp/defsystem/bin/post-18e_CVS_2003-05-30_20:10:06/defsystem.fasl-18e.3".
CMU Common Lisp post-18e CVS 2003-05-30 20:10:06, running on saphir
With core: /home/gilbert/cmucl/2003-05-30/lib/cmucl/lib/lisp.core
Dumped on: Sat, 2003-05-31 02:28:04+02:00 on lorien.users.earthlink.net
See <http://www.cons.org/cmucl/> for support information.
Loaded subsystems:
    Python 1.1, target Intel x86
    CLOS based on Gerd's PCL 2003/05/04 13:11:21
    Gray Streams Protocol Support
    CLX X Library MIT R5.02
* 
#<The COMMON-LISP-USER package, 32/44 internal, 0/9 external>
* 
(:MK-DEFSYSTEM :CLX-MIT-R5 :CLX-MIT-R4 :XLIB :CLX :CLX-LITTLE-ENDIAN
 :GRAY-STREAMS :GERDS-PCL :PCL-STRUCTURES :PORTABLE-COMMONLOOPS :PCL :PYTHON
 :CMU18 :CMU18E :RELATIVE-PACKAGE-NAMES :CONSERVATIVE-FLOAT-TYPE
 :RANDOM-MT19937 :HASH-NEW :STACK-CHECKING :LINKAGE-TABLE :MP :PENTIUM :I486
 :GENCGC :X86 :LINUX :GLIBC2 :UNIX :COMMON :COMMON-LISP :ANSI-CL
 :IEEE-FLOATING-POINT :CMU)
* 
NIL
* 
EXTENSIONS::%UNDEFINED%
* 
NIL
#<KERNEL:SIMPLE-FILE-ERROR {48961765}>
* 
NIL
* 
; Loading #p"/home/gilbert/cmucl/2003-05-30/lib/cmucl/lib/subsystems/gray-streams-library.x86f".
T
* 
NIL
* 
NIL
* 
NIL
* 
NIL
* 
NIL
* 
T
* 
; Python version 1.1, VM version Intel x86 on 31 MAY 03 07:49:06 pm.
; Compiling: /home/gilbert/lisp/defsystem/defsystem.lisp 31 MAY 03 06:50:15 pm

; 

; Warning: Old-style IN-PACKAGE.
; 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted HOME-SUBDIRECTORY.
; Compiling DEFUN HOME-SUBDIRECTORY: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Compiling EVAL-WHEN (COMPILE LOAD EVAL): 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted NON-EMPTY-LISTP.
; Compiling DEFUN NON-EMPTY-LISTP: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted COMPONENT-OPERATION.
; Compiling DEFUN COMPONENT-OPERATION: 
; Compiling EVAL-WHEN (COMPILE LOAD EVAL): 
; Converted OPERATING-SYSTEM-VERSION.
; Compiling DEFUN OPERATING-SYSTEM-VERSION: 
; Converted COMPILER-VERSION.
; Compiling DEFUN COMPILER-VERSION: 
; Converted AFS-BINARY-DIRECTORY.
; Compiling DEFUN AFS-BINARY-DIRECTORY: 
; Converted AFS-SOURCE-DIRECTORY.
; Compiling DEFUN AFS-SOURCE-DIRECTORY: 
; Byte Compiling Top-Level Form: 
; Converted NULL-STRING.
; Compiling DEFUN NULL-STRING: 
; Converted ENSURE-TRAILING-SLASH.
; Compiling DEFUN ENSURE-TRAILING-SLASH: 
; Converted AFS-COMPONENT.
; Compiling DEFUN AFS-COMPONENT: 
; Converted MACHINE-TYPE-TRANSLATION.
; Compiling DEFUN MACHINE-TYPE-TRANSLATION: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted SOFTWARE-TYPE-TRANSLATION.
; Compiling DEFUN SOFTWARE-TYPE-TRANSLATION: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted COMPILER-TYPE-TRANSLATION.
; Compiling DEFUN COMPILER-TYPE-TRANSLATION: 
; Byte Compiling Top-Level Form: 
; Converted CANONICALIZE-SYSTEM-NAME.
; Compiling DEFUN CANONICALIZE-SYSTEM-NAME: 
; Converted GET-SYSTEM.
; Compiling DEFUN GET-SYSTEM: 
; Compiling DEFSETF GET-SYSTEM: 
; Converted UNDEFSYSTEM.
; Compiling DEFUN UNDEFSYSTEM: 
; Converted DEFINED-SYSTEMS.
; Compiling DEFUN DEFINED-SYSTEMS: 
; Byte Compiling Top-Level Form: 
; Converted NEW-APPEND-DIRECTORIES.
; Compiling DEFUN NEW-APPEND-DIRECTORIES: 
; Converted DIRECTORY-TO-LIST.
; Compiling DEFUN DIRECTORY-TO-LIST: 
; Converted TEST-NEW-APPEND-DIRECTORIES.
; Compiling DEFUN TEST-NEW-APPEND-DIRECTORIES: 
; Converted APPEND-DIRECTORIES.
; Compiling DEFUN APPEND-DIRECTORIES: 
; Converted PATHNAME-LOGICAL-P.
; Compiling DEFUN PATHNAME-LOGICAL-P: 
; Converted NAMESTRING-PROBABLY-LOGICAL.
; Compiling DEFUN NAMESTRING-PROBABLY-LOGICAL: 
; Converted APPEND-LOGICAL-PNAMES.
; Compiling DEFUN APPEND-LOGICAL-PNAMES: 
; Byte Compiling Top-Level Form: 
; Converted NEW-FILE-TYPE.
; Compiling DEFUN NEW-FILE-TYPE: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted MAKE-TOPOLOGICAL-SORT-NODE.
; Compiling DEFSTRUCT TOPOLOGICAL-SORT-NODE: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Creation Form for #<KERNEL::CLASS-CELL TOPOLOGICAL-SORT-NODE>: 
; Converted MAKE-COMPONENT.
; Compiling DEFSTRUCT COMPONENT: 
; Compiling DEFSTRUCT COMPONENT: 
; Converted COMPONENT-LOAD-TIME.
; Compiling DEFUN COMPONENT-LOAD-TIME: 
; Converted (SETF COMPONENT-LOAD-TIME).
; Compiling DEFUN (SETF COMPONENT-LOAD-TIME): 
; Byte Compiling Top-Level Form: 
; Byte Compiling Creation Form for #<KERNEL::CLASS-CELL COMPONENT>: 
; Converted COMPUTE-SYSTEM-PATH.
; Compiling DEFUN COMPUTE-SYSTEM-PATH: 
; Converted FIND-SYSTEM.
; Compiling DEFUN FIND-SYSTEM: 
; Converted PRINT-COMPONENT.
; Compiling DEFUN PRINT-COMPONENT: 
; Converted DESCRIBE-SYSTEM.
; Compiling DEFUN DESCRIBE-SYSTEM: 
; Converted CANONICALIZE-COMPONENT-NAME.
; Compiling DEFUN CANONICALIZE-COMPONENT-NAME: 
; Converted COMPONENT-PATHNAME.
; Compiling DEFUN COMPONENT-PATHNAME: 
; Byte Compiling Top-Level Form: 
; Converted COMPONENT-ERROR-PATHNAME.
; Compiling DEFUN COMPONENT-ERROR-PATHNAME: 
; Compiling DEFSETF COMPONENT-PATHNAME: 
; Converted COMPONENT-ROOT-DIR.
; Compiling DEFUN COMPONENT-ROOT-DIR: 
; Compiling DEFSETF COMPONENT-ROOT-DIR: 
; Byte Compiling Top-Level Form: 
; Converted CLEAR-FULL-PATHNAME-TABLES.
; Compiling DEFUN CLEAR-FULL-PATHNAME-TABLES: 
; Converted COMPONENT-FULL-PATHNAME.
; Compiling DEFUN COMPONENT-FULL-PATHNAME: 
; Converted COMPONENT-FULL-PATHNAME-I.
; Compiling DEFUN COMPONENT-FULL-PATHNAME-I: 
; Byte Compiling Top-Level Form: 
; Converted TRANSLATE-VERSION.
; Compiling DEFUN TRANSLATE-VERSION: 
; Converted COMPONENT-EXTENSION.
; Compiling DEFUN COMPONENT-EXTENSION: 
; Compiling DEFSETF COMPONENT-EXTENSION: 
; Converted CREATE-COMPONENT.
; Compiling DEFUN CREATE-COMPONENT: 
; Converted DEFSYSTEM.
; Compiling DEFMACRO DEFSYSTEM: 
; Converted CREATE-COMPONENT-PATHNAMES.
; Compiling DEFUN CREATE-COMPONENT-PATHNAMES: 
; Converted GENERATE-COMPONENT-PATHNAME.
; Compiling DEFUN GENERATE-COMPONENT-PATHNAME: 
; Converted EXPAND-COMPONENT-COMPONENTS.
; Compiling DEFUN EXPAND-COMPONENT-COMPONENTS: 
; Converted EXPAND-COMPONENT-DEFINITIONS.
; Compiling DEFUN EXPAND-COMPONENT-DEFINITIONS: 
; Converted EXPAND-SERIAL-COMPONENT-CHAIN.
; Compiling DEFUN EXPAND-SERIAL-COMPONENT-CHAIN: 
; Byte Compiling Top-Level Form: 
; Converted ABSOLUTE-FILE-NAMESTRING-P.
; Compiling DEFUN ABSOLUTE-FILE-NAMESTRING-P: 
; Converted EXPAND-COMPONENT-DEFINITION.
; Compiling DEFUN EXPAND-COMPONENT-DEFINITION: 
; Converted LINK-COMPONENT-DEPENDS-ON.
; Compiling DEFUN LINK-COMPONENT-DEPENDS-ON: 
; Converted TOPOLOGICAL-SORT.
; Compiling DEFUN TOPOLOGICAL-SORT: 
; Converted SPLIT-STRING.
; Compiling DEFUN SPLIT-STRING: 
; Converted PROMPT-STRING.
; Compiling DEFUN PROMPT-STRING: 
; Byte Compiling Top-Level Form: 
; Converted FORMAT-JUSTIFIED-STRING.
; Compiling DEFUN FORMAT-JUSTIFIED-STRING: 
; Converted TELL-USER.
; Compiling DEFUN TELL-USER: 
; Converted TELL-USER-DONE.
; Compiling DEFUN TELL-USER-DONE: 
; Converted WITH-TELL-USER.
; Compiling DEFMACRO WITH-TELL-USER: 
; Converted TELL-USER-NO-FILES.
; Compiling DEFUN TELL-USER-NO-FILES: 
; Converted TELL-USER-REQUIRE-SYSTEM.
; Compiling DEFUN TELL-USER-REQUIRE-SYSTEM: 
; Converted TELL-USER-GENERIC.
; Compiling DEFUN TELL-USER-GENERIC: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Top-Level Form: 
; Converted INTERNAL-REAL-TIME-IN-SECONDS.
; Compiling DEFUN INTERNAL-REAL-TIME-IN-SECONDS: 
; Converted READ-CHAR-WAIT.
; Compiling DEFUN READ-CHAR-WAIT: 
; Converted Y-OR-N-P-WAIT.
; Compiling DEFUN Y-OR-N-P-WAIT: 
; Converted OPERATE-ON-SYSTEM.
; Compiling DEFUN OPERATE-ON-SYSTEM: 
; Converted COMPILE-SYSTEM.
; Compiling DEFUN COMPILE-SYSTEM: 
; Converted LOAD-SYSTEM.
; Compiling DEFUN LOAD-SYSTEM: 
; Converted CLEAN-SYSTEM.
; Compiling DEFUN CLEAN-SYSTEM: 
; Converted EDIT-SYSTEM.
; Compiling DEFUN EDIT-SYSTEM: 
; Converted HARDCOPY-SYSTEM.
; Compiling DEFUN HARDCOPY-SYSTEM: 
; Converted OPERATE-ON-COMPONENT.
; Compiling DEFUN OPERATE-ON-COMPONENT: 
; Byte Compiling Top-Level Form: 
; Converted OPERATE-ON-SYSTEM-DEPENDENCIES.
; Compiling DEFUN OPERATE-ON-SYSTEM-DEPENDENCIES: 
; Converted MODULE-DEPENDS-ON-CHANGED.
; Compiling DEFUN MODULE-DEPENDS-ON-CHANGED: 
; Byte Compiling Top-Level Form: 
; Converted OPERATE-ON-COMPONENTS.
; Compiling DEFUN OPERATE-ON-COMPONENTS: 
; Converted NEW-REQUIRE.
; Compiling DEFUN NEW-REQUIRE: 
; Byte Compiling Top-Level Form: 
; Converted FIND-LANGUAGE.
; Compiling DEFUN FIND-LANGUAGE: 
; Byte Compiling Top-Level Form: 
; Converted MAKE-LANGUAGE.
; Compiling DEFSTRUCT LANGUAGE: 
; Compiling DEFSTRUCT LANGUAGE: 
; Converted PRINT-LANGUAGE.
; Compiling DEFUN PRINT-LANGUAGE: 
; Converted COMPILE-FUNCTION.
; Compiling DEFUN COMPILE-FUNCTION: 
; Converted LOAD-FUNCTION.
; Compiling DEFUN LOAD-FUNCTION: 
; Converted DEFAULT-SOURCE-EXTENSION.
; Compiling DEFUN DEFAULT-SOURCE-EXTENSION: 
; Converted DEFAULT-BINARY-EXTENSION.
; Compiling DEFUN DEFAULT-BINARY-EXTENSION: 
; Converted DEFINE-LANGUAGE.
; Compiling DEFMACRO DEFINE-LANGUAGE: 
; Byte Compiling Top-Level Form: 
; Byte Compiling Creation Form for #<KERNEL::CLASS-CELL LANGUAGE>: 
; Converted SCHEME-COMPILE-FILE.
; Compiling DEFUN SCHEME-COMPILE-FILE: 
; Converted RUN-UNIX-PROGRAM.
; Compiling DEFUN RUN-UNIX-PROGRAM: 
; Converted DEFAULT-OUTPUT-PATHNAME.
; Compiling DEFUN DEFAULT-OUTPUT-PATHNAME: 
; Converted RUN-COMPILER.
; Compiling DEFUN RUN-COMPILER: 
; Converted C-COMPILE-FILE.
; Compiling DEFUN C-COMPILE-FILE: 
; Byte Compiling Top-Level Form: 
; Converted COMPILE-AND-LOAD-OPERATION.
; Compiling DEFUN COMPILE-AND-LOAD-OPERATION: 
; Converted UNMUNGE-LUCID.
; Compiling DEFUN UNMUNGE-LUCID: 
; Converted COMPILE-FILE-OPERATION.
; Compiling DEFUN COMPILE-FILE-OPERATION: 
; Converted NEEDS-COMPILATION.
; Compiling DEFUN NEEDS-COMPILATION: 
; Converted NEEDS-LOADING.
; Compiling DEFUN NEEDS-LOADING: 
; Converted LOAD-FILE-OPERATION.
; Compiling DEFUN LOAD-FILE-OPERATION: 
; Byte Compiling Top-Level Form: 
; Converted DELETE-BINARIES-OPERATION.
; Compiling DEFUN DELETE-BINARIES-OPERATION: 
; Converted BINARY-EXISTS.
; Compiling DEFUN BINARY-EXISTS: 
; Converted COMPILE-AND-LOAD-SOURCE-IF-NO-BINARY.
; Compiling DEFUN COMPILE-AND-LOAD-SOURCE-IF-NO-BINARY: 
; Converted LOAD-SOURCE-IF-NO-BINARY.
; Compiling DEFUN LOAD-SOURCE-IF-NO-BINARY: 
; Converted FILES-WHICH-NEED-COMPILATION.
; Compiling DEFUN FILES-WHICH-NEED-COMPILATION: 
; Converted FILES-IN-SYSTEM-AND-DEPENDENTS.
; Compiling DEFUN FILES-IN-SYSTEM-AND-DEPENDENTS: 
; Converted FILES-IN-SYSTEM.
; Compiling DEFUN FILES-IN-SYSTEM: 
; Byte Compiling Top-Level Form: 
; Converted FILE-PATHNAMES-IN-COMPONENT.
; Compiling DEFUN FILE-PATHNAMES-IN-COMPONENT: 
; Converted FILE-COMPONENTS-IN-COMPONENT.
; Compiling DEFUN FILE-COMPONENTS-IN-COMPONENT: 
; Converted SYSTEM-SOURCE-SIZE.
; Compiling DEFUN SYSTEM-SOURCE-SIZE: 
; Converted FILE-LIST-SIZE.
; Compiling DEFUN FILE-LIST-SIZE: 
; Byte Compiling Top-Level Form: 

; Compilation unit finished.
;   1 warning


; home:lisp/defsystem/defsystem.fasl-18e.3 written.
; Compilation finished in 0:00:04.
Warning:  MAKE also exports the following symbols:
  (HARDCOPY-SYSTEM COMPILE-SYSTEM *COMPILE-DURING-LOAD*
   *FILES-MISSING-IS-AN-ERROR* AFS-SOURCE-DIRECTORY COMPILER-TYPE-TRANSLATION
   DEFSYSTEM LOAD-SYSTEM DEFINE-LANGUAGE FILES-IN-SYSTEM OOS UNDEFSYSTEM
   *MULTIPLE-LISP-SUPPORT* *DONT-REDEFINE-REQUIRE* *BIN-SUBDIR* DESCRIBE-SYSTEM
   *RELOAD-SYSTEMS-FROM-DISK* *DEFSYSTEM-VERSION* *MINIMAL-LOAD*
   DEFINED-SYSTEMS SYSTEM-SOURCE-SIZE FIND-SYSTEM AFS-BINARY-DIRECTORY
   *CENTRAL-REGISTRY* EDIT-SYSTEM FILES-WHICH-NEED-COMPILATION CLEAN-SYSTEM
   SOFTWARE-TYPE-TRANSLATION MACHINE-TYPE-TRANSLATION OPERATE-ON-SYSTEM
   *BINARY-PATHNAME-DEFAULT* MAKE-SYSTEM-TAG-TABLE ALLEGRO-MAKE-SYSTEM-FASL
   *SOURCE-PATHNAME-DEFAULT*)

T
* 
NIL
* 
T
* 
(:MK-DEFSYSTEM ("    Defsystem version 3.2 Interim, 2000-03-15") :XLIB
 ("    CLX X Library " "MIT R5.02") :GRAY-STREAMS
 ("    Gray Streams Protocol Support") :PCL
 ("    CLOS based on Gerd's PCL " "2003/05/04 13:11:21") :PYTHON
 ("    Python " "1.1" ", target "
  #<Function "SETF (GETF *HERALD-ITEMS* :PYTHON)" {10A7B859}>)
 :BUGS
 ("See <http://www.cons.org/cmucl/> for support information." TERPRI
  "Loaded subsystems:")
 :COMMON-LISP
 ("CMU Common Lisp "
  #<Function "SETF (GETF *HERALD-ITEMS* :COMMON-LISP)" {101F2D39}>
  ", running on "
  #<Function "SETF (GETF *HERALD-ITEMS* :COMMON-LISP)" {101F2EA1}> TERPRI
  #<Function "SETF (GETF *HERALD-ITEMS* :COMMON-LISP)" {101F3169}>))
* 
T
* 
(T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T T)
* 
T
* 
#<Function EXTENSIONS:QUIT {10181831}>
* 
#<Function EXTENSIONS:QUIT {10181831}>
* 
#<The MULTIPROCESSING package, 153/192 internal, 47/59 external>
* 
*TOP-LEVEL-LOOP*
* 
STARTUP-IDLE-AND-TOP-LEVEL-LOOPS
* 
#<The UNIX package, 481/543 internal, 557/696 external>
* 
MY-SIGINT-HANDLER
* 
(NEW-ASSEM::FORGET-OUTPUT-BLOCKS MULTIPROCESSING::INIT-MULTI-PROCESSING
                                 COMMON-LISP::PACKAGE-LOCKS-INIT
                                 KERNEL::RAND-MT19937-INITIALIZER
                                 ALIEN::RESTORE-CALLBACKS
                                 #<Interpreted Function (LAMBDA # #)
                                   {48946359}>)
* 
#<The COMMON-LISP-USER package, 3/12 internal, 0/9 external>
* 
NIL
* 
EXTENSIONS::%UNDEFINED%
* 
EXTENSIONS::%UNDEFINED%
* 
T
* 
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/patch.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/Lisp-Dep/fix-cmu.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/package.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/decls.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/Lisp-Dep/mp-cmu.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/utils.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/defresource.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/setf-star.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/design.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/X11-colors.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/coordinates.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/transforms.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/regions.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/sheets.fasl-18e.3".

; In: LAMBDA (#:G2060 #:G2061 #:G2062)

;   (LET (#)
;     (DECLARE #)
;     (LET #
;       #))
; Note: Deleting unreachable code.
; 
;   (FUNCALL (THE FUNCTION #'#)
;            (PCL::FAST-METHOD-CALL-PV-CELL PCL::.CALL.)
;            (PCL::FAST-METHOD-CALL-NEXT-METHOD-CALL PCL::.CALL.)
;            PCL::.ARG0.
;            ...)
; Note: Deleting unreachable code.
; 

; Compilation unit finished.
;   2 notes


; In: LAMBDA (#:G2098 #:G2099 #:G2100)

;   (LET (#)
;     (DECLARE #)
;     (LET #
;       #))
; Note: Deleting unreachable code.
; 
;   (FUNCALL (THE FUNCTION #'#)
;            (PCL::FAST-METHOD-CALL-PV-CELL PCL::.CALL.)
;            (PCL::FAST-METHOD-CALL-NEXT-METHOD-CALL PCL::.CALL.)
;            PCL::.ARG0.
;            ...)
; Note: Deleting unreachable code.
; 

; Compilation unit finished.
;   2 notes

; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/pixmap.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/events.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/ports.fasl-18e.3".

; In:
;     LAMBDA (PCL::.KEYARGS-START. PCL::.VALID-KEYS. #:G2293 #:G2294 #:G2295)

;   (LET (#)
;     (DECLARE #)
;     (LET #
;       #))
; Note: Deleting unreachable code.
; 
;   (FUNCALL (THE FUNCTION #'#)
;            (PCL::FAST-METHOD-CALL-PV-CELL PCL::.CALL.)
;            (PCL::FAST-METHOD-CALL-NEXT-METHOD-CALL PCL::.CALL.)
;            PCL::.ARG0.
;            ...)
; Note: Deleting unreachable code.
; 

; Compilation unit finished.
;   2 notes

; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/grafts.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/medium.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/output.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/input.fasl-18e.3".
; Loading #p"/home/gilbert/work/clim/McCLIM-2003-05-31/repaint.fasl-18e.3".
; Compiling DEFMETHOD DO-GRAPHICS-WITH-OPTIONS (SHEET T): 
; Compiling DEFMETHOD DO-GRAPHICS-WITH-OPTIONS (MEDIUM T): 
; Compiling DEFMETHOD DO-GRAPHICS-WITH-OPTIONS (T T): 
; Compiling DEFMETHOD DO-GRAPHICS-WITH-OPTIONS (PIXMAP T): 
; Compiling DEFMETHOD DO-GRAPHICS-WITH-OPTIONS-INTERNAL (MEDIUM T T): 
; Byte Compiling Top-Level Form: 
; Converted WITH-MEDIUM-OPTIONS.
; Compiling DEFMACRO WITH-MEDIUM-OPTIONS: 
; Converted WITH-DRAWING-OPTIONS.
; Compiling DEFMACRO WITH-DRAWING-OPTIONS: 
; Compiling DEFMETHOD INVOKE-WITH-DRAWING-OPTIONS (MEDIUM T): 
; Compiling DEFMETHOD INVOKE-WITH-DRAWING-OPTIONS (SHEET T): 
; Compiling DEFMETHOD INVOKE-WITH-DRAWING-OPTIONS (T T): 
; Compiling DEFMETHOD INVOKE-WITH-IDENTITY-TRANSFORMATION (T T): 
Type-error in KERNEL::OBJECT-NOT-TYPE-ERROR-HANDLER:
   NIL is not of type C::CONTINUATION
   [Condition of type TYPE-ERROR]

Restarts:
  0: [ABORT] Return to Top-Level.

Debug  (type H for help)

(C::FIND-PUSHED-CONTINUATIONS #<C::CBLOCK Start = c1 {49371D0D}>)
Source: Error finding source: 
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM:  Source file no longer exists:
  target:compiler/stack.lisp.
0] ba

0: (C::FIND-PUSHED-CONTINUATIONS #<C::CBLOCK Start = c1 {49371D0D}>)
1: (C::STACK-ANALYZE
    #<C:COMPONENT #x4939D525
        NAME= "DEFMETHOD INVOKE-WITH-IDENTITY-TRANSFORMATION (T T)">)
2: (C::NATIVE-COMPILE-COMPONENT
    #<C:COMPONENT #x4939D525
        NAME= "DEFMETHOD INVOKE-WITH-IDENTITY-TRANSFORMATION (T T)">)
3: (C::COMPILE-COMPONENT
    #<C:COMPONENT #x4939D525
        NAME= "DEFMETHOD INVOKE-WITH-IDENTITY-TRANSFORMATION (T T)">)
4: (C::COMPILE-TOP-LEVEL
    (#<LAMBDA #x49370F75
         NAME= "Top-Level Form"
         TYPE= #
         WHERE-FROM= :DEFINED
         VARS= NIL>)
    NIL)
5: (C::CONVERT-AND-MAYBE-COMPILE
    (PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
                         'INVOKE-WITH-IDENTITY-TRANSFORMATION
                         'NIL
                         (LIST 'T 'T)
                         ...)
    ((PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
                          'INVOKE-WITH-IDENTITY-TRANSFORMATION
                          'NIL
                          #
                          ...)
     (PROGN # #) C::ORIGINAL-SOURCE-START 0 11))
6: (C::PROCESS-FORM
    (PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
                         'INVOKE-WITH-IDENTITY-TRANSFORMATION
                         'NIL
                         (LIST 'T 'T)
                         ...)
    ((PROGN # #) C::ORIGINAL-SOURCE-START 0 11))
7: (C::PROCESS-FORM 2
                    (PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
                                         'INVOKE-WITH-IDENTITY-TRANSFORMATION
                                         'NIL
                                         (LIST 'T 'T)
                                         ...)
                    ((PROGN # #) C::ORIGINAL-SOURCE-START 0 11))[:EXTERNAL]
8: (C::PROCESS-PROGN
    ((PCL::PROCLAIM-DEFGENERIC 'INVOKE-WITH-IDENTITY-TRANSFORMATION '#)
     (PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
                          'INVOKE-WITH-IDENTITY-TRANSFORMATION
                          'NIL
                          #
                          ...))
    ((PROGN # #) C::ORIGINAL-SOURCE-START 0 11))
9: (C::PROCESS-FORM
    (PROGN
     (PCL::PROCLAIM-DEFGENERIC 'INVOKE-WITH-IDENTITY-TRANSFORMATION '#)
     (PCL::LOAD-DEFMETHOD 'STANDARD-METHOD
                          'INVOKE-WITH-IDENTITY-TRANSFORMATION
                          'NIL
                          #
                          ...))
    (C::ORIGINAL-SOURCE-START 0 11))
10: (C::PROCESS-FORM
     (DEFMETHOD INVOKE-WITH-IDENTITY-TRANSFORMATION
                (MEDIUM CONT)
                (WITH-DRAWING-OPTIONS # #))
     (C::ORIGINAL-SOURCE-START 0 11))
11: (C::PROCESS-FORM 2
                     (DEFMETHOD INVOKE-WITH-IDENTITY-TRANSFORMATION
                                (MEDIUM CONT)
                                (WITH-DRAWING-OPTIONS # #))
                     (C::ORIGINAL-SOURCE-START 0 11))[:EXTERNAL]
12: (C::PROCESS-SOURCES #<Source-Info>)
13: ((FLET #:G0
       C::SUB-COMPILE-FILE))
14: (C::SUB-COMPILE-FILE #<Source-Info> NIL)
15: (C::SUB-COMPILE-FILE 1
                         #<Source-Info>
                         #<Stream for file "/home/gilbert/work/clim/McCLIM-2003-05-31/graphics.err">)[:EXTERNAL]
16: (COMPILE-FILE "/home/gilbert/work/clim/McCLIM-2003-05-31/graphics.lisp"
                  :OUTPUT-FILE
                  "/home/gilbert/work/clim/McCLIM-2003-05-31/graphics.fasl-18e.3"
                  :ERROR-FILE
                  ...)
17: (MAKE::COMPILE-FILE-OPERATION #<FILE: graphics> T)
18: (MAKE::COMPILE-FILE-OPERATION 2 #<FILE: graphics> T)[:EXTERNAL]
19: (MAKE::LOAD-FILE-OPERATION #<FILE: graphics> :ALL)
20: (MAKE::LOAD-FILE-OPERATION 2 #<FILE: graphics> :ALL)[:EXTERNAL]
21: (MAKE::OPERATE-ON-COMPONENT #<FILE: graphics> :LOAD :ALL)
22: (MAKE::OPERATE-ON-COMPONENT 3 #<FILE: graphics> :LOAD :ALL)[:EXTERNAL]
23: (MAKE::OPERATE-ON-COMPONENTS #<DEFSYSTEM: clim-core>
                                 :LOAD
                                 :ALL
                                 (#<FILE: repaint> #<FILE: input>
                                  #<FILE: output> #<FILE: medium>
                                  #<FILE: grafts> ...))
24: (MAKE::OPERATE-ON-COMPONENTS 4 #<DEFSYSTEM: clim-core> :LOAD :ALL ...)[:EXTERNAL]
25: (MAKE::OPERATE-ON-COMPONENT #<DEFSYSTEM: clim-core> :LOAD :ALL)
26: (MAKE::OPERATE-ON-COMPONENT 3 #<DEFSYSTEM: clim-core> :LOAD :ALL)[:EXTERNAL]
27: (MAKE:OPERATE-ON-SYSTEM :CLIM-CORE :LOAD :FORCE :ALL ...)
28: (MAKE:OPERATE-ON-SYSTEM 4 :CLIM-CORE :LOAD)[:EXTERNAL]
29: (MAKE::OPERATE-ON-SYSTEM-DEPENDENCIES #<DEFSYSTEM: clim> :LOAD :ALL)
30: (MAKE::OPERATE-ON-SYSTEM-DEPENDENCIES 3 #<DEFSYSTEM: clim> :LOAD :ALL)[:EXTERNAL]
31: (MAKE::OPERATE-ON-COMPONENT #<DEFSYSTEM: clim> :LOAD :ALL)
32: (MAKE::OPERATE-ON-COMPONENT 3 #<DEFSYSTEM: clim> :LOAD :ALL)[:EXTERNAL]
33: (MAKE:OPERATE-ON-SYSTEM :CLIM :LOAD :FORCE NIL ...)
34: (MAKE:OPERATE-ON-SYSTEM 20 :CLIM :LOAD)[:EXTERNAL]
35: (MAKE::NEW-REQUIRE :CLIM NIL NIL NIL ...)
36: (MAKE::NEW-REQUIRE 1 :CLIM #\6 REQUIRE ...)[:EXTERNAL]
37: (EXTENSIONS:INTERACTIVE-EVAL (REQUIRE :CLIM))
38: (COMMON-LISP::%TOP-LEVEL)
39: ((LABELS COMMON-LISP::RESTART-LISP
       EXTENSIONS:SAVE-LISP))

0]