(PROGN (PRIN1 "Use LOADDB to load database files! " T) (ERROR!)) ("25-Feb-85 19:01:01" . {ERIS}MAILREADER>TALK.;4) FNS (CLEAR.PROSE P.ESC.SEQ P.READBUFFER P.RESET PHONEMEMODE PROSE.COMMENCE.OUTPUT PROSE.ESC.SEQ PROSE.RESET PROSE.STOP READPORT RESET.PROSE SAY) (READATABASE) ( CALL CLEAR.PROSE (LIST CHCON1) P.ESC.SEQ (SUB1 MKSTRING ARG IPLUS) P.READBUFFER (RS232READBYTE LIST PACK MAPCAR CHARACTER) P.RESET (P.READBUFFER TERPRI) PHONEMEMODE (RS232WRITECHARS READPORT) PROSE.COMMENCE.OUTPUT (RS232WRITECHARS) PROSE.ESC.SEQ (RS232FORCEOUTPUT) PROSE.RESET (P.READBUFFER TERPRI) PROSE.STOP (PROSE.ESC.SEQ) READPORT (RS232READBYTE LIST) RESET.PROSE (APPEND LIST CHCON1) SAY (SUBSTRING CHCON1 READPORT GNC TRANSCRIPT LIST) NIL BIND CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY (OUTPUTBYTES) NIL NLAMBDA CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL NOBIND CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL RECORD CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL CREATE CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL FETCH CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL REPLACE CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL REFFREE CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL REF CLEAR.PROSE NIL P.ESC.SEQ (args) P.READBUFFER NIL P.RESET NIL PHONEMEMODE (ON/OFF OUTPUTBYTES) PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ (SEQUENCE) PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY (INSTRING STRING ESCAPECHAR) NIL SETFREE CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL SET CLEAR.PROSE (BYTE) P.ESC.SEQ (i) P.READBUFFER (X) P.RESET NIL PHONEMEMODE (BYTE) PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT (BYTE) RESET.PROSE (OUTPUTBYTES BYTE) SAY (PORTCONTENT.BEFORE CHAR PHONEMEMODE) NIL SMASHFREE CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL SMASH CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL PROP CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL TEST CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET (PRINTOUT) PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY (PHONEMEMODE) NIL TESTFREE CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL PREDICATE CLEAR.PROSE NIL P.ESC.SEQ (IGREATERP IGEQ) P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL EFFECT CLEAR.PROSE (RS232CLEARBUFFER RS232WRITEBYTE RS232FORCEOUTPUT) P.ESC.SEQ (PRINT) P.READBUFFER ( FRPLACD) P.RESET (RS232WRITEBYTE BLOCK PRIN1) PHONEMEMODE (RS232WRITEBYTE RS232FORCEOUTPUT) PROSE.COMMENCE.OUTPUT (RS232WRITEBYTE) PROSE.ESC.SEQ (RS232WRITEBYTE RS232WRITECHARS) PROSE.RESET ( RS232CLEARBUFFER RS232WRITEBYTE PRIN1 BLOCK) PROSE.STOP NIL READPORT (FRPLACD) RESET.PROSE ( RS232WRITEBYTE RS232FORCEOUTPUT) SAY (PROSE.RESET BLOCK PHONEMEMODE RS232WRITEBYTE PROSE.COMMENCE.OUTPUT) NIL CLISP CLEAR.PROSE (for in do finally) P.ESC.SEQ (for from to do) P.READBUFFER (for while collect finally in) P.RESET (printout) PHONEMEMODE (for in do finally) PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET (printout) PROSE.STOP NIL READPORT (for while collect finally) RESET.PROSE (for in do finally) SAY (while do) NIL SPECVARS CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL LOCALVARS CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL APPLY CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL ERROR CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL LOCALFREEVARS CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL ARGS CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL USERTEMPLATES PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) OP# (CALL) WINDOWPROP (CALL EVAL PROP EVAL . PPE) UNINTERRUPTABLY (CALL .. EVAL) WINDOWDELPROP (CALL EVAL PROP EVAL . PPE) SHAZAM (CALL .. NIL) perform (MACRO ARGS (PERFORMTRAN ARGS T)) WINDOWADDPROP (CALL EVAL PROP EVAL EVAL . PPE) NIL 0 CLEAR.PROSE NIL P.ESC.SEQ NIL P.READBUFFER NIL P.RESET NIL PHONEMEMODE NIL PROSE.COMMENCE.OUTPUT NIL PROSE.ESC.SEQ NIL PROSE.RESET NIL PROSE.STOP NIL READPORT NIL RESET.PROSE NIL SAY NIL NIL )