perm filename FOO2.OLD[S,AIL]1 blob
sn#000802 filedate 1972-09-05 generic text, type T, neo UTF8
COMMENT ⊗ VALID 00003 PAGES
RECORD PAGE DESCRIPTION
00001 00001
00002 00002
00013 00003 TTYIN STRING OWN+BILTIN 2
00018 ENDMK
⊗;
COMMENT β
MUMBLE THIS IS THE FILE OF FUNCTION NAMES
FOR THE INITIAL SYMBOL TABLE MAKER;
<ASSIGN>
UNTYPE←←0
<DEFINITIONS>
INF
XOR
AND
NOT
IN
OR
COMMENT
EQV
UNION
INTER
SETO
SETC
SWAP
LEQ
NEQ
GEQ
ASSOC
MUMBLE Here must be described in some detail the precise meaning
of all this malarky;
<FUNCTIONS>
M UNTYPE OWN 0
OUT UNTYPE OWN+BILTIN 2
VALINT (CHANNEL) INTEGR VALUE
VALSTR (STRING) STRING VALUE
BREAKSET UNTYPE OWN+BILTIN 3
VALINT (TABLE) INTEGR VALUE
VALSTR (STRING) STRING VALUE
VALINT (CONDITIONS) INTEGR VALUE
INPUT STRING OWN 2
VALINT (CHANNEL) INTEGR VALUE
VALINT (TABLE) INTEGR VALUE
LOOKUP UNTYPE OWN+BILTIN 3
VALINT (CHANNEL) INTEGR VALUE
VALSTR (FILENAME) STRING VALUE
REFINT (FLAG) INTEGR REFRNC
OPEN UNTYPE OWN+BILTIN 8
VALINT (CHANNEL) INTEGR VALUE
VALSTR (DEVICE) STRING VALUE
VALINT (MODE) INTEGR VALUE
VALINT (INBUFS) INTEGR VALUE
VALINT (OUTBUFS) INTEGR VALUE
REFINT (COUNT) INTEGR REFRNC
REFINT (BRCHAR) INTEGR REFRNC
REFINT (EOF) INTEGR REFRNC
POINT INTEGR OWN+BILTIN+CONOK X3
VALINT (BYTESIZE) INTEGR VALUE
REFINT (ADDRESS) INTEGR REFRNC
VALINT (BYTEPOS) INTEGR VALUE
.BBPP. INTEGR OWN+BILTIN 3
VALINT (BYTESIZE) INTEGR VALUE
REFINT (ADDRESS) INTEGR REFRNC
VALINT (BYTEPOS) INTEGR VALUE
EQU INTEGR OWN+BILTIN+CONOK X2
VALSTR (ARG1) STRING VALUE
VALSTR (ARG2) STRING VALUE
CVS STRING OWN+BILTIN+CONOK X1
VALINT (NUMBER) INTEGR VALUE
CVD INTEGR OWN+BILTIN+CONOK X1
VALSTR (STRING) STRING VALUE
SCAN STRING OWN+CONOK X3
REFSTR (STRING) STRING REFRNC
VALINT (TABLE) INTEGR VALUE
REFINT (BRCHAR) INTEGR REFRNC
RELEASE UNTYPE OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
LINOUT UNTYPE OWN+BILTIN 2
VALINT (CHANNEL) INTEGR VALUE
VALINT (LINENO) INTEGR VALUE
CLOSE UNTYPE OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
CLOSO UNTYPE OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
CLOSIN UNTYPE OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
CVOS STRING OWN+BILTIN+CONOK X1
VALARI (NUMBER) INTEGR+FLOTNG VALUE
ENTER UNTYPE OWN+BILTIN 3
VALINT (CHANNEL) INTEGR VALUE
VALSTR (NAME) STRING VALUE
REFINT (FAIL-FLG) INTEGR REFRNC
MTAPE UNTYPE OWN+BILTIN 2
VALINT (CHANNEL) INTEGR VALUE
VALINT (OPER) INTEGR VALUE
WORDIN INTEGR OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
WORDOUT UNTYPE OWN+BILTIN 2
VALINT (CHANNEL) INTEGR VALUE
VALARI (ARG) INTEGR+FLOTNG VALUE
CVO INTEGR OWN+BILTIN+CONOK X1
VALSTR (STRING) STRING VALUE
USETI UNTYPE OWN+BILTIN 2
VALINT (CHANN) INTEGR VALUE
VALINT (BLOCK) INTEGR VALUE
USETO UNTYPE OWN+BILTIN 2
VALINT (CHANNEL) INTEGR VALUE
VALINT (BLOCK) INTEGR VALUE
CVSIX INTEGR OWN+BILTIN+CONOK X1
VALSTR (STRING) STRING VALUE
CVFIL INTEGR OWN+BILTIN+CONOK X3
VALSTR (INPUT) STRING VALUE
REFINT (EXTEN) INTEGR REFRNC
REFINT (PPN) INTEGR REFRNC
CALL INTEGR OWN+BILTIN 2
VALINT (INPUT-VAL) INTEGR VALUE
VALSTR (STRING-DESCR) STRING VALUE
RENAME UNTYPE OWN+BILTIN 4
VALINT (CHANNEL) INTEGR VALUE
VALSTR (FILE-NAME) STRING VALUE
VALINT (PROTECTION) INTEGR VALUE
REFINT (FLAG) INTEGR REFRNC
CVASC INTEGR OWN+BILTIN+CONOK X1
VALSTR (STRING-IN) STRING VALUE
CVSTR STRING OWN+BILTIN+CONOK X1
VALINT (INTEGR-IN) INTEGR VALUE
CVXSTR STRING OWN+BILTIN+CONOK X1
VALINT (INTEGR-IN) INTEGR VALUE
.SUBSR STRING OWN+BILTIN+CONOK X3
VALSTR (THESTRING) STRING VALUE
VALINT (FOR) INTEGR VALUE
VALINT (START) INTEGR VALUE
.SUBST STRING OWN+BILTIN+CONOK X3
VALSTR (THESTRING) STRING VALUE
VALINT (TO) INTEGR VALUE
VALINT (START) INTEGR VALUE
SETBREAK UNTYPE OWN+BILTIN 4
VALINT (TABLE) INTEGR VALUE
VALSTR (BRCHARS) STRING VALUE
VALSTR (OMITS) STRING VALUE
VALSTR (MODES) STRING VALUE
STDBRK UNTYPE OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
ARRYIN UNTYPE OWN+BILTIN 3
VALINT (CHANNEL) INTEGR VALUE
REFANY (WHERE) INTEGR+FLOTNG+ITMVAR REFRNC
VALINT (COUNT) INTEGR VALUE
ARRYOUT UNTYPE OWN+BILTIN 3
VALINT (CHANNEL) INTEGR VALUE
REFANY (WHERE) INTEGR+FLOTNG+ITMVAR REFRNC
VALINT (COUNT) INTEGR VALUE
SETFORMAT UNTYPE OWN+BILTIN 2
VALINT (WIDTH) INTEGR VALUE
VALINT (DIGS) INTEGR VALUE
CVG STRING OWN+BILTIN+CONOK X1
VALREL (NUMBER) FLOTNG VALUE
CVF STRING OWN+BILTIN+CONOK X1
VALREL (NUMBER) FLOTNG VALUE
CVE STRING OWN+BILTIN+CONOK X1
VALREL (NUMBER) FLOTNG VALUE
REALIN FLOTNG OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
INTIN INTEGR OWN+BILTIN 1
VALINT (CHANNEL) INTEGR VALUE
REALSCAN FLOTNG OWN+BILTIN+CONOK X2
REFSTR (ST-NUM) STRING REFRNC
REFINT (FLAG-BREAK) INTEGR REFRNC
INTSCAN INTEGR OWN+BILTIN+CONOK X2
REFSTR (ST-NUM) STRING REFRNC
REFINT (FLAG-BREAK) INTEGR REFRNC
ARRINFO INTEGR OWN+BILTIN 2
ARRALL (ARRAY) INTEGR+FLOTNG+SET+LSTBIT+ITMVAR+STRING REFRNC+SBSCRP
VALINT (CODE) INTEGR VALUE
ARRBLT UNTYPE OWN+BILTIN 3
REFALL (DEST) INTEGR+FLOTNG+ITMVAR+SET REFRNC
REFALL (SOURCE) INTEGR+FLOTNG+ITMVAR+SET REFRNC
VALINT (HOWMANY) INTEGR VALUE
ARRTRAN UNTYPE OWN+BILTIN 2
ARRMST (ARRDST) INTEGR+FLOTNG+ITMVAR+SET+LSTBIT+STRING REFRNC+SBSCRP
ARRMST (ARRSRC) INTEGR+FLOTNG+ITMVAR+SET+LSTBIT+STRING REFRNC+SBSCRP
CODE INTEGR OWN+BILTIN 2
VALINT (INST) INTEGR VALUE
REFINT (ADDR) INTEGR REFRNC
USERERR UNTYPE OWN+BILTIN 3
VALINT (VALUE) INTEGR VALUE
VALINT (CODE) INTEGR VALUE
VALSTR (MSG) STRING VALUE
CVSI ITMVAR OWN 2
VALSTR (PNAME) STRING VALUE
REFINT (FLAG) INTEGR REFRNC
CVIS STRING OWN 2
VALITM (ITEMNO) ITMVAR VALUE
REFINT (FLAG) INTEGR REFRNC
NEW_PNAME UNTYPE OWN 2
VALITM (ITEM) ITMVAR VALUE
VALSTR (STRING) STRING VALUE
DEL_PNAME UNTYPE OWN 1
VALTIM (ITEM) ITMVAR VALUE
TYPEIT INTEGR OWN+BILTIN 1
VALITM (ITEM) ITMVAR VALUE
LISTX INTEGR OWN+BILTIN 3
VALLST (LIST) LSTBIT+SET VALUE
VALITM (ITEM) ITMVAR VALUE
VALINT (OCCURENCE) INTEGR VALUE
INCHRW INTEGR OWN+BILTIN 0
INCHRS INTEGR OWN+BILTIN 0
INCHWL STRING OWN+BILTIN 0
INCHSL STRING OWN+BILTIN 1
REFINT (FLAG) INTEGR REFRNC
INSTR STRING OWN+BILTIN 1
VALINT (BRCHAR) INTEGR VALUE
INSTRL STRING OWN+BILTIN 1
VALINT (BRCHAR) INTEGR VALUE
INSTRS STRING OWN+BILTIN 2
REFINT (FLAG) INTEGR REFRNC
VALINT (BRCHAR) INTEGR VALUE
TTYIN STRING OWN+BILTIN 2
VALINT (TABLE) INTEGR VALUE
REFINT (BRCHAR) INTEGR REFRNC
TTYINL STRING OWN+BILTIN 2
VALINT (TABLE) INTEGR VALUE
REFINT (BRCHAR) INTEGR REFRNC
TTYINS STRING OWN+BILTIN 2
VALINT (TABLE) INTEGR VALUE
REFINT (BRCHAR) INTEGR REFRNC
OUTCHR UNTYPE OWN+BILTIN 1
VALINT (CHAR) INTEGR VALUE
OUTSTR UNTYPE OWN+BILTIN 1
VALSTR (STR) STRING VALUE
GETFORMAT UNTYPE OWN+BILTIN 2
REFINT (WDTH) INTEGR REFRNC
REFINT (DIGS) INTEGR REFRNC
GETCHAN INTEGR OWN+BILTIN 0
FILEINFO UNTYPE OWN+BILTIN 1
ARRINT (ARRAY) INTEGR REFRNC+SBSCRP
USERCON UNTYPE OWN+BILTIN 3
REFINT (INDEX) INTEGR REFRNC
REFINT (VALUE) INTEGR REFRNC
VALINT (FLAG) INTEGR VALUE
MUMBLE THESE FOLLOWING DO NOT GO IN THE EXPORT VERSION.
;
CLRBUF UNTYPE OWN+BILTIN 0
PTYGET INTEGR OWN+BILTIN 0
PTYREL UNTYPE OWN+BILTIN 1
VALINT (LINE) INTEGR VALUE
PTIFRE INTEGR OWN+BILTIN 1
VALINT (LINE) INTEGR VALUE
PTOCNT INTEGR OWN+BILTIN 1
VALINT (LINE) INTEGR VALUE
PTCHRW INTEGR OWN+BILTIN 1
VALINT (LINE) INTEGR VALUE
PTCHRS INTEGR OWN+BILTIN 1
VALINT (LINE) INTEGR VALUE
PTOCHS UNTYPE OWN+BILTIN 2
VALINT (LINE) INTEGR VALUE
VALINT (CHAR) INTEGR VALUE
PTOCHW UNTYPE OWN+BILTIN 2
VALINT (LINE) INTEGR VALUE
VALINT (CHAR) INTEGR VALUE
PTOSTR UNTYPE OWN+BILTIN 2
VALINT (LINE) INTEGR VALUE
VALSTR (INFO) STRING VALUE
BACKUP UNTYPE OWN+BILTIN 0
LODED UNTYPE OWN+BILTIN 1
VALSTR (RELINE) STRING VALUE
PTYALL STRING OWN+BILTIN 1
VALINT (LINE) INTEGR VALUE
PTYSTR STRING OWN+BILTIN 2
VALINT (LINE) INTEGR VALUE
VALINT (BRCHAR) INTEGR VALUE
PTYIN STRING OWN+BILTIN 3
VALINT (LINE) INTEGR VALUE
VALINT (BKTBL) INTEGR VALUE
REFINT (BRCHAR) INTEGR REFRNC
IFGLOBAL INTEGR OWN+BILTIN 1
VALITM (ITM) ITMVAR VALUE
ISSUE INTEGR OWN 4
VALINT (DIRECT) INTEGR VALUE
VALSTR (SRC) STRING VALUE
VALSTR (DES) STRING VALUE
VALSTR (NAME) STRING VALUE
QUEUE INTEGR OWN 2
VALINT (DIR) INTEGR VALUE
VALINT (UNQ) INTEGR VALUE
GET_DATA STRING OWN 2
VALINT (DIR) INTEGR VALUE
VALINT (UNQ) INTEGR VALUE
PUT_DATA UNTYPE OWN 3
VALINT (DIR) INTEGR VALUE
VALINT (UNQ) INTEGR VALUE
VALSTR (STR) STRING VALUE
GET_BIT INTEGR OWN 1
VALINT (UNQ) INTEGR VALUE
GET_ENTRY INTEGR OWN 4
VALINT (DIR) INTEGR VALUE
VALSTR (SRC) STRING VALUE
VALSTR (DES) STRING VALUE
VALSTR (NAM) STRING VALUE
GET_SET SET OWN 4
VALINT (DIR) INTEGR VALUE
VALSTR (SRC) STRING VALUE
VALSTR (DES) STRING VALUE
VALSTR (NAM) STRING VALUE
MUMBLE **** END OF THINGS NOT EXPORTED **** ;
<END>
β