(DEFINE-FILE-INFO PACKAGE "INTERLISP" READTABLE "INTERLISP" BASE 10)
(FILECREATED "18-Mar-88 16:09:05" {ERIS}<LISPCORE>INTERNAL>LIBRARY>ABC.;4 2101   

      changes to%:  (VARS ABCCOMS)

      previous date%: "29-Jul-87 12:04:16" {ERIS}<LISPCORE>INTERNAL>LIBRARY>ABC.;3)


(* "
Copyright (c) 1986, 1987, 1988 by Xerox Corporation.  All rights reserved.
")

(PRETTYCOMPRINT ABCCOMS)

(RPAQQ ABCCOMS ((VARS (MSRECORDTRANFLG T)
                          (DWIMIFYCOMPFLG)
                          (MSMACROPROPS COMPILERMACROPROPS)
                          (CLEANUPOPTIONS '(RC F))
                          (CROSSCOMPILING T)
                          (ASKEDITHIST T)
                          (RECOMPILEDEFAULT 'CHANGES)
                          (CROSSCOMPILING 'ASK))
                    (FILES (SOURCE)
                           FILESETS)
                    (P (MOVD? 'APPLY* 'SPREADAPPLY*)
                       [RESETVARS ((CROSSCOMPILING T))
                              (FILESLOAD EXPORTS.ALL)
                              (AND (EQ (ASKUSER DWIMWAIT 'N "Check imports? " NIL T)
                                       'Y)
                                   (ERSETQ (CHECKIMPORTS EXPORTFILES T]
                       (PRIN1 
             "**** SET IL:DFNFLG TO IL:PROP IF YOU EDIT SYSTEM SOURCES THAT CAN'T BE RUN INTERPRETED" 
                              T))))

(RPAQQ MSRECORDTRANFLG T)

(RPAQQ DWIMIFYCOMPFLG NIL)

(RPAQ MSMACROPROPS COMPILERMACROPROPS)

(RPAQQ CLEANUPOPTIONS (RC F))

(RPAQQ CROSSCOMPILING T)

(RPAQQ ASKEDITHIST T)

(RPAQQ RECOMPILEDEFAULT CHANGES)

(RPAQQ CROSSCOMPILING ASK)
(FILESLOAD (SOURCE)
       FILESETS)
(MOVD? 'APPLY* 'SPREADAPPLY*)
[RESETVARS ((CROSSCOMPILING T))
       (FILESLOAD EXPORTS.ALL)
       (AND (EQ (ASKUSER DWIMWAIT 'N "Check imports? " NIL T)
                'Y)
            (ERSETQ (CHECKIMPORTS EXPORTFILES T]
(PRIN1 "**** SET IL:DFNFLG TO IL:PROP IF YOU EDIT SYSTEM SOURCES THAT CAN'T BE RUN INTERPRETED" T)
(PUTPROPS ABC COPYRIGHT ("Xerox Corporation" 1986 1987 1988))
(DECLARE%: DONTCOPY
  (FILEMAP (NIL)))
STOP
