(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
(" 1-Mar-85 19:09:04" . {ERIS}<SPEECH>MAILREADER>PROSE-PHONE.;21)
FNS (PHONEINPUT.MONITOR PROSE.OPERATOR START.OPERATOR.PROCESS START.TONE.MONITOR.PROCESS 
TONE.MONITOR.PROCESS)
(READATABASE)
(
CALL PHONEINPUT.MONITOR (PROCESSP) PROSE.OPERATOR (DATE OPENFILE OPENHASHFILE) START.OPERATOR.PROCESS 
(ADD.PROCESS) START.TONE.MONITOR.PROCESS (ADD.PROCESS) TONE.MONITOR.PROCESS (LOGAND BUS.INPUT RPLACA 
CONS IPLUS) NIL
BIND PHONEINPUT.MONITOR (DUMMY) PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL 
START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS NIL NIL
NLAMBDA PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS (USEDFREE) 
START.TONE.MONITOR.PROCESS (USEDFREE) TONE.MONITOR.PROCESS NIL NIL
NOBIND PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS
 NIL TONE.MONITOR.PROCESS NIL NIL
RECORD PHONEINPUT.MONITOR (STATE STATEINFO) PROSE.OPERATOR NIL START.OPERATOR.PROCESS (STATE) 
START.TONE.MONITOR.PROCESS (STATE) TONE.MONITOR.PROCESS (STATE) NIL
CREATE PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS
 NIL TONE.MONITOR.PROCESS NIL NIL
FETCH PHONEINPUT.MONITOR (STATEINFO TALKING PHONEINPUT PROCESS) PROSE.OPERATOR NIL 
START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS (PHONEINPUT) NIL
REPLACE PHONEINPUT.MONITOR (HALTSPEECH) PROSE.OPERATOR NIL START.OPERATOR.PROCESS (OPERATORPROCESS) 
START.TONE.MONITOR.PROCESS (TONEPROCESS) TONE.MONITOR.PROCESS (PHONEINPUT) NIL
REFFREE PHONEINPUT.MONITOR NIL PROSE.OPERATOR (\TONE.MONITOR.PROCESS \PROSE.OPERATOR.PROCESS) 
START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS (CTRL TONE DTMF 
P.TIMEOUTTIMER) NIL
REF PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
SETFREE PHONEINPUT.MONITOR NIL PROSE.OPERATOR (MAILREADERLOGFILE MAILREADERUSERSFILE) 
START.OPERATOR.PROCESS (\PROSE.OPERATOR.PROCESS) START.TONE.MONITOR.PROCESS (\TONE.MONITOR.PROCESS) 
TONE.MONITOR.PROCESS (\TIMEOUTFLG) NIL
SET PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS (THE.TONE I) NIL
SMASHFREE PHONEINPUT.MONITOR (STATE) PROSE.OPERATOR NIL START.OPERATOR.PROCESS (STATE) 
START.TONE.MONITOR.PROCESS (STATE) TONE.MONITOR.PROCESS (STATE) NIL
SMASH PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
PROP PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
TEST PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
TESTFREE PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL 
START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS (\IGNORETIMER \TIMEOUTFLG) NIL
PREDICATE PHONEINPUT.MONITOR NIL PROSE.OPERATOR (BOUNDP OPENP) START.OPERATOR.PROCESS (BOUNDP PROCESSP
) START.TONE.MONITOR.PROCESS (BOUNDP PROCESSP) TONE.MONITOR.PROCESS (IGREATERP TIMEREXPIRED?) NIL
EFFECT PHONEINPUT.MONITOR (START.PROSE.PROCESS BLOCK DSUBST WAKE.PROCESS) PROSE.OPERATOR (
WAIT.FOR.CALL BLOCK OFF.HOOK P.CHUNK PRIN1 TERPRI P.RESET.TIMER WAKE.PROCESS SUSPEND.PROCESS) 
START.OPERATOR.PROCESS (USEDFREE) START.TONE.MONITOR.PROCESS (USEDFREE) TONE.MONITOR.PROCESS (BLOCK 
BUS.OUTPUT P.RESET.TIMER PHONEINPUT.MONITOR P.CHUNK P.BYE) NIL
CLISP PHONEINPUT.MONITOR NIL PROSE.OPERATOR (while do printout) START.OPERATOR.PROCESS NIL 
START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS (while do for as from to) NIL
SPECVARS PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL 
START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS NIL NIL
LOCALVARS PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL 
START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS NIL NIL
APPLY PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
ERROR PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
LOCALFREEVARS PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL 
START.TONE.MONITOR.PROCESS NIL TONE.MONITOR.PROCESS NIL NIL
ARGS PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS 
NIL TONE.MONITOR.PROCESS NIL NIL
USERTEMPLATES SHAZAM (CALL .. NIL) OP# (CALL) WINDOWPROP (CALL EVAL PROP EVAL . PPE) perform (MACRO 
ARGS (PERFORMTRAN ARGS T)) UNINTERRUPTABLY (CALL .. EVAL) WINDOWDELPROP (CALL EVAL PROP EVAL . PPE) 
PERFORM (MACRO ARGS (PERFORMTRAN ARGS T)) WINDOWADDPROP (CALL EVAL PROP EVAL EVAL . PPE) NIL
0 PHONEINPUT.MONITOR NIL PROSE.OPERATOR NIL START.OPERATOR.PROCESS NIL START.TONE.MONITOR.PROCESS NIL 
TONE.MONITOR.PROCESS NIL NIL

)