; -*- Mode:TEXT -*- ; This is the UNFASL for DJ: PFC; TEST2.FBIN#1 (SI::FASL-OP-VERSION-INFO (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-STRING "") (SYSTEM:FASL-OP-STRING "FALCON") <:FALCON>) (SYSTEM:FASL-OP-FIXED 2)) (SYSTEM:FASL-OP-END-OF-WHACK) (SYSTEM:FASL-OP-FILE-PROPERTY-LIST (SYSTEM:FASL-OP-LIST [8] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-STRING "") (SYSTEM:FASL-OP-STRING "COMPILE-DATA") <:COMPILE-DATA>) (SYSTEM:FASL-OP-LIST [6] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-STRING "PFC") (SYSTEM:FASL-OP-STRING "Orson Welles") (SYSTEM:FASL-OP-FIXED 2800540874) (SYSTEM:FASL-OP-FIXED 126) (SYSTEM:FASL-OP-FIXED 87) (SYSTEM:FASL-OP-LIST [4] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-STRING "COMPILER") (SYSTEM:FASL-OP-STRING "NEW-DESTINATIONS") ) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-STRING "GLOBAL") (SYSTEM:FASL-OP-STRING "T") ) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "SITE") <:SITE>) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "LMI") <:LMI>) => ( <:SITE> <:LMI>)) => ("PFC" "Orson Welles" 2800540874 126 87 ( <:SITE> <:LMI>))) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "SOURCE-FILE-GENERIC-PATHNAME") <:SOURCE-FILE-GENERIC-PATHNAME>) (SYSTEM:FASL-OP-EVAL1 (SYSTEM:FASL-OP-LIST [7] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-STRING "FS") (SYSTEM:FASL-OP-STRING "MAKE-FASLOAD-PATHNAME") ) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [43] {"GLOBAL"}) (SYSTEM:FASL-OP-STRING "QUOTE") ) (SYSTEM:FASL-OP-STRING "DJ") => ( "DJ")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "DSK") => ( "DSK")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "PFC") => ( "PFC")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "TEST2") => ( "TEST2")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "UNSPECIFIC") <:UNSPECIFIC>) => ( <:UNSPECIFIC>)) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-INDEX [68] {<:UNSPECIFIC>}) => ( <:UNSPECIFIC>)) => ( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( <:UNSPECIFIC>) ( <:UNSPECIFIC>))) (EVAL '( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( <:UNSPECIFIC>) ( <:UNSPECIFIC>)))) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "QFASL-SOURCE-FILE-UNIQUE-ID") <:QFASL-SOURCE-FILE-UNIQUE-ID>) (SYSTEM:FASL-OP-EVAL1 (SYSTEM:FASL-OP-LIST [7] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [56] {}) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-INDEX [59] {"DJ"}) => ( "DJ")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "DSK") => ( "DSK")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "PFC") => ( "PFC")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "TEST2") => ( "TEST2")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-STRING "LISP") => ( "LISP")) (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA (SYSTEM:FASL-OP-INDEX [58] {}) (SYSTEM:FASL-OP-FIXED 1) => ( 1)) => ( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( "LISP") ( 1))) (EVAL '( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( "LISP") ( 1)))) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "PACKAGE") <:PACKAGE>) (SYSTEM:FASL-OP-PACKAGE-SYMBOL (SYSTEM:FASL-OP-INDEX [32] {""}) (SYSTEM:FASL-OP-STRING "USER") <:USER>) => (<:COMPILE-DATA> ("PFC" "Orson Welles" 2800540874 126 87 ( <:SITE> <:LMI>)) <:SOURCE-FILE-GENERIC-PATHNAME> (SI::**EVAL** (QUOTE ( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( <:UNSPECIFIC>) ( <:UNSPECIFIC>)))) <:QFASL-SOURCE-FILE-UNIQUE-ID> (SI::**EVAL** (QUOTE ( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( "LISP") ( 1)))) <:PACKAGE> <:USER>))) (SI::FASL-OP-K-COMPILED-FUNCTION (SYSTEM:FASL-OP-SYMBOL ) (SI::FASL-OP-K-LOCAL-REFS (SYSTEM:FASL-OP-FIXED 0) number of local-refs) (SI::FASL-OP-K-REFS (SYSTEM:FASL-OP-FIXED 0) number of refs) (SI::FASL-OP-K-ENTRY-POINTS (SYSTEM:FASL-OP-FIXED 1) number of entry points (SYSTEM:FASL-OP-FIXED 0) number of args (SYSTEM:FASL-OP-FIXED 0) entry offset) (SYSTEM:FASL-OP-FIXED 1) number of immediates (SYSTEM:FASL-OP-FIXED 0) ref offset (SYSTEM:FASL-OP-INITIALIZE-ARRAY (SYSTEM:FASL-OP-ARRAY (SYSTEM:FASL-OP-SYMBOL ) =AREA (SYSTEM:FASL-OP-SYMBOL ) =TYPE (SYSTEM:FASL-OP-TEMP-LIST [1] Area=FASL-TEMP-AREA (SYSTEM:FASL-OP-FIXED 3) => (3)) =DIMLIST (SYSTEM:FASL-OP-INDEX [104] {}) =DISPLACED-P (SYSTEM:FASL-OP-INDEX [104] {}) =LEADER (SYSTEM:FASL-OP-INDEX [104] {}) =INDEX-OFFSET) (SYSTEM:FASL-OP-FIXED 3) (SYSTEM:FASL-OP-FIXED 1) (SYSTEM:FASL-OP-FIXED 2) (SYSTEM:FASL-OP-FIXED 3)) immediate object (SYSTEM:FASL-OP-FIXED 0) number of load-time evals (SYSTEM:FASL-OP-STOREIN-FUNCTION-CELL [114] {# 67445211>} (SYSTEM:FASL-OP-INDEX [93] {})) Disassembled Code for (MOVEI RETURN 0 CH-RETURN BOXED BOXED-MD BOXED-VMA DT-NONE) ) (SYSTEM:FASL-OP-END-OF-WHACK) (SYSTEM:FASL-OP-END-OF-FILE)