Google
 
Trailing-Edge - PDP-10 Archives - decuslib20-01 - decus/20-0004/permstatus.com
There are no other files named permstatus.com in the archive.
(FILECREATED "18-NOV-81 22:31:14" ("compiled on " <LISPUSERS>PERMSTATUS.;7) (2 . 2) brecompiled 
explicitly: PERMSTATUS in "INTERLISP-MAXC " dated "18-NOV-81 22:01:03")
(FILECREATED "24-AUG-81 13:50:30" <LISPUSERS>PERMSTATUS.;7 1936 changes to: PERMSTATUS previous date: 
"16-APR-79 16:39:21" <LISPUSERS>PERMSTATUS.;5)

PERMSTATUS BINARY
6(5-.0(Z`2B+,<`"+,<,<,,<`,<w,<,$-XB`,<,<w~,<-$-,<Z`,,,<,<w},<.$-^,,+Z`3B+ `,>(,>,<`,<.$-, ,^/3B+,<.,<$/,<`,<$/,<0,<,<@0`+"ZZ2XBZw,<8,<8,<2,<8,<8*3+3B+'Z`3B3+&,<`,<`$4,<`"4Z,~S

04e!J(FILE . 1)
(ACCESS . 1)
(BYTESIZE . 1)
(FILEPTR . 1)
(WRITEDATE . 1)
(MDP . 1)
OPNJFN
PERMSTATUS
ACCESS
GETFILEINFO
OPENBYTESIZE
IWRITEDATE
"****WARNING:  Writedate on permanent file has changed:  "
LISPXPRIN1
LISPXPRINT
((DUMMY) . 0)
(0 . 1)
(0 . 1)
(0 . 1)
ERRORSET
OLD
OPENFILE
APPEND
SETFILEPTR
RESTOREMAP
(CONSNL CF KT BHC IUNBOX URET1 ALIST MKN FGFPTR KNIL ENTER6)(X`Hxp@8000
(PRETTYCOMPRINT PERMSTATUSCOMS)
(RPAQQ PERMSTATUSCOMS ((FNS PERMSTATUS) (LOCALVARS . T) (DECLARE: DOEVAL@COMPILE DONTCOPY (P (
RESETSAVE DWIMIFYCOMPFLG T)))))
NIL