(PROGN (PRIN1 "Use LOADDB to load database files!
" T) (ERROR!))
(" 4-Mar-85 14:08:31" . {ERIS}<SPEECH>MAILREADER>MAIL-READER-USERS.;23)
FNS (ADD.TO.NAME.HASHFILE STRIPVERSION ADD.ALL.TO.NAME.HASHFILE CHANGE.MAILFILE COMPUTE.TOUCHTONES 
GET.LOGININFO)
(READATABASE)
(
CALL ADD.TO.NAME.HASHFILE (STRIPVERSION P.SEARCH.FOR.MAILFILE SUBSTRING MKSTRING CONCATLIST 
COMPUTE.TOUCHTONES CONS REMOVE LIST) STRIPVERSION (PACKFILENAME FILENAMEFIELD) 
ADD.ALL.TO.NAME.HASHFILE (CREATEHASHFILE ALLOCSTRING ADD.TO.NAME.HASHFILE) CHANGE.MAILFILE (
GETHASHFILE) COMPUTE.TOUCHTONES (GNC FASSOC LIST) GET.LOGININFO (GETHASHFILE) NIL
BIND ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE (OLD.STRING.PTR) 
CHANGE.MAILFILE NIL COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
NLAMBDA ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
NOBIND ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
RECORD ADD.TO.NAME.HASHFILE (LOGININFO) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE 
(LOGININFO) COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
CREATE ADD.TO.NAME.HASHFILE (LOGININFO) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE 
NIL COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
FETCH ADD.TO.NAME.HASHFILE (MAILFILE NAME) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL 
CHANGE.MAILFILE (NAME) COMPUTE.TOUCHTONES NIL GET.LOGININFO (NAME) NIL
REPLACE ADD.TO.NAME.HASHFILE (MAILFILE) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE 
(MAILFILE) COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
REFFREE ADD.TO.NAME.HASHFILE (OLD.STRING.PTR NAME.HASHFILE) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE 
(ISL AISBU PTS) CHANGE.MAILFILE (MAILREADERUSERSFILE) COMPUTE.TOUCHTONES (LETTER.TO.NUMBER.LIST) 
GET.LOGININFO (MAILREADERUSERSFILE) NIL
REF ADD.TO.NAME.HASHFILE (PERSON CHANGED.PERSON) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE (
NAME.HASHFILE) CHANGE.MAILFILE (TOUCHTONES PEOPLE.WITH.SAME.TOUCHTONES USER MAILFILE) 
COMPUTE.TOUCHTONES (NAME.STRING) GET.LOGININFO (TOUCHTONES USER) NIL
SETFREE ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
SET ADD.TO.NAME.HASHFILE (STRING.PTR NAME.IN.TOUCHTONES PEOPLE.WITH.SAME.TOUCHTONES) STRIPVERSION NIL 
ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE (ALL.LOGININFO PERSON) COMPUTE.TOUCHTONES (LETTER) 
GET.LOGININFO (PERSON) NIL
SMASHFREE ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
SMASH ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE (PERSON) 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
PROP ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
TEST ADD.TO.NAME.HASHFILE (PEOPLE.WITH.SAME.TOUCHTONES) STRIPVERSION (FILE) ADD.ALL.TO.NAME.HASHFILE 
NIL CHANGE.MAILFILE NIL COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
TESTFREE ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
PREDICATE ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
EFFECT ADD.TO.NAME.HASHFILE (PUTHASHFILE) STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE (MAPC 
CLOSEHASHFILE COPYFILE) CHANGE.MAILFILE (PUTHASHFILE) COMPUTE.TOUCHTONES (FRPLACD) GET.LOGININFO NIL 
NIL
CLISP ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE (for in do) CHANGE.MAILFILE (
for in when do) COMPUTE.TOUCHTONES (while collect) GET.LOGININFO (for in do) NIL
SPECVARS ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
LOCALVARS ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
APPLY ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
ERROR ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
LOCALFREEVARS ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE 
NIL COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL
ARGS ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO 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 ADD.TO.NAME.HASHFILE NIL STRIPVERSION NIL ADD.ALL.TO.NAME.HASHFILE NIL CHANGE.MAILFILE NIL 
COMPUTE.TOUCHTONES NIL GET.LOGININFO NIL NIL

)