; -*- 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")
          <COMPILER:NEW-DESTINATIONS>)
        (SYSTEM:FASL-OP-PACKAGE-SYMBOL
          (SYSTEM:FASL-OP-STRING "GLOBAL")
          (SYSTEM:FASL-OP-STRING "T")
          <GLOBAL: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>)
       => (<COMPILER:NEW-DESTINATIONS> <GLOBAL:T> <:SITE> <:LMI>))
     => ("PFC" "Orson Welles" 2800888890 126 87 (<COMPILER:NEW-DESTINATIONS> <GLOBAL:T> <: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")
          <FS: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")
            <GLOBAL:QUOTE>)
          (SYSTEM:FASL-OP-STRING "DJ")
         => (<GLOBAL:QUOTE> "DJ"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "DSK")
         => (<GLOBAL:QUOTE> "DSK"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "PFC")
         => (<GLOBAL:QUOTE> "PFC"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "TEST2")
         => (<GLOBAL:QUOTE> "TEST2"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-PACKAGE-SYMBOL
            (SYSTEM:FASL-OP-INDEX [32] {""})
            (SYSTEM:FASL-OP-STRING "UNSPECIFIC")
            <:UNSPECIFIC>)
         => (<GLOBAL:QUOTE> <:UNSPECIFIC>))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-INDEX [68] {<:UNSPECIFIC>})
         => (<GLOBAL:QUOTE> <:UNSPECIFIC>))
       => (<FS:MAKE-FASLOAD-PATHNAME> (<GLOBAL:QUOTE> "DJ") (<GLOBAL:QUOTE> "DSK") (<GLOBAL:QUOTE> "PFC") (<GLOBAL:QUOTE> "TEST2") (<GLOBAL:QUOTE> <:UNSPECIFIC>) (<GLOBAL:QUOTE> <:UNSPECIFIC>)))
      (EVAL '(<FS:MAKE-FASLOAD-PATHNAME> (<GLOBAL:QUOTE> "DJ") (<GLOBAL:QUOTE> "DSK") (<GLOBAL:QUOTE> "PFC") (<GLOBAL:QUOTE> "TEST2") (<GLOBAL:QUOTE> <:UNSPECIFIC>) (<GLOBAL:QUOTE> <: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] {<FS:MAKE-FASLOAD-PATHNAME>})
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-INDEX [59] {"DJ"})
         => (<GLOBAL:QUOTE> "DJ"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "DSK")
         => (<GLOBAL:QUOTE> "DSK"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "PFC")
         => (<GLOBAL:QUOTE> "PFC"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "TEST2")
         => (<GLOBAL:QUOTE> "TEST2"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-STRING "LISP")
         => (<GLOBAL:QUOTE> "LISP"))
        (SYSTEM:FASL-OP-LIST [2] Area=WORKING-STORAGE-AREA
          (SYSTEM:FASL-OP-INDEX [58] {<GLOBAL:QUOTE>})
          (SYSTEM:FASL-OP-FIXED 4)
         => (<GLOBAL:QUOTE> 4))
       => (<FS:MAKE-FASLOAD-PATHNAME> (<GLOBAL:QUOTE> "DJ") (<GLOBAL:QUOTE> "DSK") (<GLOBAL:QUOTE> "PFC") (<GLOBAL:QUOTE> "TEST2") (<GLOBAL:QUOTE> "LISP") (<GLOBAL:QUOTE> 4)))
      (EVAL '(<FS:MAKE-FASLOAD-PATHNAME> (<GLOBAL:QUOTE> "DJ") (<GLOBAL:QUOTE> "DSK") (<GLOBAL:QUOTE> "PFC") (<GLOBAL:QUOTE> "TEST2") (<GLOBAL:QUOTE> "LISP") (<GLOBAL:QUOTE> 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 (<COMPILER:NEW-DESTINATIONS> <GLOBAL:T> <:SITE> <:LMI>)) <:SOURCE-FILE-GENERIC-PATHNAME> (SI::**EVAL** (QUOTE (<FS:MAKE-FASLOAD-PATHNAME> (<GLOBAL:QUOTE> "DJ") (<GLOBAL:QUOTE> "DSK") (<GLOBAL:QUOTE> "PFC") (<GLOBAL:QUOTE> "TEST2") (<GLOBAL:QUOTE> <:UNSPECIFIC>) (<GLOBAL:QUOTE> <:UNSPECIFIC>)))) <:QFASL-SOURCE-FILE-UNIQUE-ID> (SI::**EVAL** (QUOTE (<FS:MAKE-FASLOAD-PATHNAME> (<GLOBAL:QUOTE> "DJ") (<GLOBAL:QUOTE> "DSK") (<GLOBAL:QUOTE> "PFC") (<GLOBAL:QUOTE> "TEST2") (<GLOBAL:QUOTE> "LISP") (<GLOBAL:QUOTE> 4)))) <:PACKAGE> <:USER>)))

(SI::FASL-OP-K-COMPILED-FUNCTION
  (SYSTEM:FASL-OP-SYMBOL <F1>)
  (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] {#<NCOMPILED-FUNCTION <F1> 27553167>}
    (SYSTEM:FASL-OP-INDEX [93] {<F1>}))
  
  Disassembled Code for <F1>
  
  (MOVEI RETURN 352190464 CH-RETURN BOXED BOXED-MD BOXED-VMA DT-NONE)
  
  )

(SYSTEM:FASL-OP-END-OF-WHACK)

(SYSTEM:FASL-OP-END-OF-FILE)