(DEFINE-FILE-INFO READTABLE "INTERLISP" PACKAGE "INTERLISP") (FILECREATED "24-Feb-93 19:00:18" ("compiled on " |{PELE:MV:ENVOS}LIBRARY>CHATDECLS.;3|) "19-Feb-93 17:03:08" bcompl'd in "Medley 19-Feb-93 ..." dated "19-Feb-93 18:20:42") (FILECREATED "20-Jan-93 13:47:40" {DSK}lde>lispcore>library>CHATDECLS.;2 3757 changes to%: ( RECORDS CHAT.STATE CHATDISPLAYTYPE CHATUSERSTATE) previous date%: "11-Jun-90 14:39:02" {DSK}lde>lispcore>library>CHATDECLS.;1) (PRETTYCOMPRINT CHATDECLSCOMS) (RPAQQ CHATDECLSCOMS ((* Declarations used by various CHAT files) (RECORDS CHAT.STATE CHATDISPLAYTYPE CHATUSERSTATE))) (DATATYPE CHAT.STATE ((HELD FLAG) (CHATINEMACS FLAG) (UNDERLINEMODE FLAG) (ROLLMODE FLAG) (WRAPMODE FLAG) (LOCALECHO FLAG) (NIL BITS 1) (RUNNING? POINTER) (WINDOW POINTER) (DSP POINTER) (OUTSTREAM POINTER) (INSTREAM POINTER) (TEXTSTREAM POINTER) (TTYWIDTH WORD) (TTYHEIGHT WORD) (XPOS WORD) (YPOS WORD) (FONTWIDTH WORD) (FONTHEIGHT WORD) (FONTDESCENT WORD) (TOPMARGIN WORD) (BOTTOMMARGIN WORD) CLEARMODEFN TYPEOUTPROC TERM.TAB.STOPS TERM.IDENTITY.STRING TERM.NORMAL.FONT ITALICFONT TERM.STATE FONT PLAINFONT CHATBOLDFONT HOMEPOS TYPESCRIPTSTREAM) XPOS _ 0 YPOS _ 0 BOTTOMMARGIN _ 0 ROLLMODE _ T) (RECORD CHATDISPLAYTYPE (HOST DPYCODE DPYNAME)) (RECORD CHATUSERSTATE (HELD RUNNING? INSTREAM OUTSTREAM CARETSTATE TYPESCRIPTOFD TYPEOUTPROC CHATINEMACS)) (/DECLAREDATATYPE (QUOTE CHAT.STATE) (QUOTE (FLAG FLAG FLAG FLAG FLAG FLAG (BITS 1) POINTER POINTER POINTER POINTER POINTER POINTER WORD WORD WORD WORD WORD WORD WORD WORD WORD POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER POINTER)) (QUOTE ((CHAT.STATE 0 ( FLAGBITS . 0)) (CHAT.STATE 0 (FLAGBITS . 16)) (CHAT.STATE 0 (FLAGBITS . 32)) (CHAT.STATE 0 (FLAGBITS . 48)) (CHAT.STATE 0 (FLAGBITS . 64)) (CHAT.STATE 0 (FLAGBITS . 80)) (CHAT.STATE 0 (BITS . 96)) ( CHAT.STATE 2 POINTER) (CHAT.STATE 4 POINTER) (CHAT.STATE 6 POINTER) (CHAT.STATE 8 POINTER) (CHAT.STATE 10 POINTER) (CHAT.STATE 12 POINTER) (CHAT.STATE 1 (BITS . 15)) (CHAT.STATE 14 (BITS . 15)) ( CHAT.STATE 15 (BITS . 15)) (CHAT.STATE 16 (BITS . 15)) (CHAT.STATE 17 (BITS . 15)) (CHAT.STATE 18 ( BITS . 15)) (CHAT.STATE 19 (BITS . 15)) (CHAT.STATE 20 (BITS . 15)) (CHAT.STATE 21 (BITS . 15)) ( CHAT.STATE 22 POINTER) (CHAT.STATE 24 POINTER) (CHAT.STATE 26 POINTER) (CHAT.STATE 28 POINTER) ( CHAT.STATE 30 POINTER) (CHAT.STATE 32 POINTER) (CHAT.STATE 34 POINTER) (CHAT.STATE 36 POINTER) ( CHAT.STATE 38 POINTER) (CHAT.STATE 40 POINTER) (CHAT.STATE 42 POINTER) (CHAT.STATE 44 POINTER))) ( QUOTE 46)) (PUTPROPS CHATDECLS COPYRIGHT ("Venue & Xerox Corporation" 1985 1986 1990 1993)) NIL