; -*- Mode:TEXT -*- ; This is the UNFASL for DJ: PFC; TEST2.FBIN#4 (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 2800888890) (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" 2800888890 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 4) => ( 4)) => ( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( "LISP") ( 4))) (EVAL '( ( "DJ") ( "DSK") ( "PFC") ( "TEST2") ( "LISP") ( 4)))) (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" 2800888890 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") ( 4)))) <: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 0) number of immediates (SYSTEM:FASL-OP-FIXED 0) number of load-time evals (SYSTEM:FASL-OP-STOREIN-FUNCTION-CELL [104] {# 27553167>} (SYSTEM:FASL-OP-INDEX [93] {})) Disassembled Code for (MOVEI RETURN 352190464 CH-RETURN BOXED BOXED-MD BOXED-VMA DT-NONE) ) (SYSTEM:FASL-OP-END-OF-WHACK) (SYSTEM:FASL-OP-END-OF-FILE)