(FILECREATED "25-Mar-86 12:13:25" {ERIS}<LISPCORE>CML>LAB>CMLLEFTOVERS.;1 863    

      changes to:  (VARS CMLLEFTOVERSCOMS))


(PRETTYCOMPRINT CMLLEFTOVERSCOMS)

(RPAQQ CMLLEFTOVERSCOMS [(P (MOVD (QUOTE *)
                                  (QUOTE PROCLAIM))
                            (MOVD (QUOTE *)
                                  (QUOTE COMPILER::DEFTRANSFORM))
                            (DEFSETF SYMBOL-FUNCTION PUTD)
                            (MOVD (QUOTE MKATOM)
                                  (QUOTE INTERN))
                            (MOVD (QUOTE EVQ)
                                  (QUOTE INTERN])
(MOVD (QUOTE *)
      (QUOTE PROCLAIM))
(MOVD (QUOTE *)
      (QUOTE COMPILER::DEFTRANSFORM))
(DEFSETF SYMBOL-FUNCTION PUTD)
(MOVD (QUOTE MKATOM)
      (QUOTE INTERN))
(MOVD (QUOTE EVQ)
      (QUOTE INTERN))
(DECLARE: DONTCOPY
  (FILEMAP (NIL)))
STOP