(DEFINE-FILE-INFO READTABLE "XCL" PACKAGE "INTERLISP") (FILECREATED "25-Jan-98 11:41:30" ("compiled on " |{DSK}sources>COMPATIBILITY.;1|) "30-Mar-95 20:33:04" |bcompl'd| |in| "Medley 14-Aug-95 ..." |dated| "14-Aug-95 15:27:48") (FILECREATED "16-May-90 15:00:10" |{DSK}local>lde>lispcore>sources>COMPATIBILITY.;2| 2011 |changes| |to:| (VARS COMPATIBILITYCOMS) |previous| |date:| "16-Oct-86 23:43:55" |{DSK}local>lde>lispcore>sources>COMPATIBILITY.;1|) DEFINEDP :D8 (I 0 A) @d3@đ´ @Á É´iNIL NIL () FGETD :D8 (L (0 FN)) @ bdd˛żdd™żdd’ż@(5 GETD) NIL () PUTDQ :D8 (I 1 Y I 0 X) @A @(6 PUTD) NIL () PUTDQ? :D8 (I 1 DEF I 0 FN) @ hđ´ @A (16 PUTD 5 GETD) NIL () RESETTERMCHARS :D8 (L (1 SYSTEMTYPE 0 TERMTABLE)) hNIL NIL () RESETINT :D8 (L (1 TO 0 FROM)) hNIL NIL () (PRETTYCOMPRINT COMPATIBILITYCOMS) (RPAQQ COMPATIBILITYCOMS ((FNS DEFINEDP FGETD PUTDQ PUTDQ? RESETTERMCHARS RESETINT) (P (MOVD (QUOTE HARRAYP) (QUOTE HASHARRAYP))) (DECLARE\: DONTEVAL@LOAD DOEVAL@COMPILE DONTCOPY COMPILERVARS (ADDVARS ( NLAMA) (NLAML PUTDQ? PUTDQ) (LAMA))))) (MOVD (QUOTE HARRAYP) (QUOTE HASHARRAYP)) (PUTPROPS COMPATIBILITY COPYRIGHT ("Venue & Xerox Corporation" 1984 1985 1986 1990)) NIL