Google
 

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_1_19910112 - 6-exec/execde.unv
There are 28 other files named execde.unv in the archive. Click here to see a list.
x
,5f@P B@ CN %yJ5	IFNB <A>&,<	UACCT [ASCIZ \&8A\]
>
	IFB <A&X>,<	UACCT [0]	
>
UACCT [0]	
>C5IQ C&. -iJt	IFNB <A>.	,<	UADDR [ASCIZ \.(A\]
>
	IFB <A.H>,<	UADDR [0]	
>
UADDR [0]	
>C4:P 
C4\qP C3%PP
	UALTYP [ASCIZ @A@]YP CRmI7P tCSR o1F{
	JSP CX,.SAVT
	JSP CX,CW%{P CW%{	P nCW%{	P D@ Ee@P E'%[P ENf: aH	IFNB <A>,<	UBSLSH [ASCIZ  \A\]
>
	IFB <@A>,<	UBSLSH [0]	
>
BSLSH [0]	HDREV2P&BEV2
P PEV2P&DEV2P QEV2 P&FEV2,P QEV20P&HEV4[RP'gEV5@@'fEV6
P REV6
RP&HF@ Ge@ ,GeLR +G,kP tG-l`Q G". #)J 	IFNB <A>#I,<	UCHAR [ASCIZ \#hA\]
>
	IFB <A$>,<	UCHAR [0]	
>
UCHAR [0]	
>G6
(` EQL-.CMABC+SBLOCK.CMABC+SBLG6
, EL).CMABP+SBLOCK.CMABP+SBLG6
=Q  G6l CL.CMBFP+SBLOCK.CMBFP+SBLG6*` HQLE.CMBRK+FBLOCK.CMBRK+FBLG6k Q G6X Q `G6m DL!.CMCNT+SBLOCK.CMCNT+SBLG6$ GL9.CMDAT+FBLOCK.CMDAT+FBLG6$Y@ HLA.CMDEF+FBLOCK.CMDEF+FBLG6$]@Q @G6%@Q  G6.,\ II"	IFNB <A>i,<	UCMERR [ASCIZ \A\]
>
	IFB <(A>,<	UCMERR [0]	
>
CMERR`[0]	G65IQ@`G65I`@;KX.CMFLG+SBLOCK.CMFLG+SBLG65MQUOG65l!FQL5.CMFNP+FBLOCK.CMFNP+FBLG6=(@ FL1.CMGJB+SBLOCK.CMGJB+SBLG6EL GQL=.CMHLP+FBLOCK.CMHLP+FBLG6Lj Q G6Mh` DQL%.CMINC+SBLOCK.CMINC+SBLG6Mj Q G6Mz@ :AKT.CMIOJ+SBLOCK.CMIOJ+SBLG6\^ P G6uyQ @G6uz Q @G6v[ Q  G6v^Q G6|j Q  G7L@ CQL.CMPTR+SBLOCK.CMPTR+SBLG7=Q  G7N  BQL.CMRTY+SBLOCK.CMRTY+SBLG7z Q `G7$Q G7%z`Q `G7'
>
	IFB <!8A>,<	UCOLON [0]	
>
COLON [0]	9Ia	IFNB <A>Y,<	UCOMMA [ASCIZ x\A\]
>
	IFB <A>,<	UCOMMA [0]	
>
COMMA [0]	1G;
       CALL CONF      CG@,P G@,;xP G@-	6P G@.)7P G@.<P G@.N8P GHP GK 	)HP	IFNB <A>	I,<	UCRR [ASCIZ \	hA\]
>
	IFB <A>
,<	UCRR [0]	
>
	UCRR [0]	
>
GRyP 
GRd9HP @GRd9IP GReL{P GSH`P GSI P GSI< YH;	IFNB <A>y,<	UCTRLE [ASCIZ \A\]
>
	IFB <8A>,<	UCTRLE [0]	
>
CTRLE [0]	N@P I 	H&	IFNB <A>),<	UDASH [ASCIZ \HA\]
>
	IFB <Ah>,<	UDASH [0]	
>
UDASH [0]	
>I$*:Q @I:=P I$lzP'hI%|SP'pI&8 P I&>6P'pI HF	IFNB <A>!,<	UDEC [ASCIZ \@A\]
>
	IFB <A>`,<	UDEC [0]	
>
	UDEC [0]	
>
I63 IL_	A==:PPTRI1		;PCL ALLOCATE TIPHIS PAGE AT CURREIpNT PAGE POINTER
J	B==PPTR_-9	;DEFJ0INE PAGE NUMBER
JP	PPTR==PPTR+C*10Jp00	;STEP TO NEXT KPAGE SLOT
	IFG PK0PTR-DDTFST,<PRINTKPX ?Exec page buffKpers overlapping DDT
>rlapping DI6= b&
	A==<-1b8B<C>+1B<C-D>> bX
	IF1,<IFDEF %Abx,<PRINTX ?A ALREcADY DEFINED>>
	Dc8EFINE %A (OP,AC,cXY,MSK)<
	$A==<Zcx B>		
	OP (<AC>,B'Y,MSK)><AC>I7 qI-	IFNB <A>,<	UDEF [ASCIZ \0A\]
>
	IFB <A>P,<	UDEF [0]	
>
	UDEF [0]	
>
I7 !I	IFNB <A>A,<	UDEV [ASCIZ \`A\]
>
	IFB <A>,<	UDEV [0]	
>
	UDEV [0]	
>
IFN "J	IFNB <A>"!,<	UDEXT [ASCIZ \"@A\]
>
	IFB <A"`>,<	UDEXT [0]	
>
UDEXT [0]	
>IYVP I'> IW	IFNB <A>1,<	UDIRS [ASCIZ \PA\]
>
	IFB <Ap>,<	UDIRS [0]	
>
UDIRS [0]	
>I' iIL	IFNB <A>	,<	UDIR [ASCIZ \(A\]
>
	IFB <A>H,<	UDIR [0]	
>
	UDIR [0]	
>
I?' 	Iv	IFNB <A>),<	UDOT [ASCIZ \HA\]
>
	IFB <A>h,<	UDOT [0]	
>
	UDOT [0]	
>
IR
:P IRNn '!J@	IFNB <A>'A,<	UDTIV [ASCIZ \'`A\]
>
	IFB <A(>,<	UDTIV [0]	
>
UDTIV [0]	
>IS +J_	IFNB <A>+9,<	UDTP [ASCIZ \+XA\]
>
	IFB <A>+x,<	UDTP [0]	
>
	UDTP [0]	
>
IS ,AJj	IFNB <A>,a,<	UDTR [ASCIZ \-A\]
>
	IFB <A>- ,<	UDTR [0]	
>
	UDTR [0]	
>
IS@NBZ<A>
>
	IFB <A>,<	UDT [0]	
>
K Q K60 k1F[IFN EMCSSWIFN EMCSSWK6<{P KK|@ rqG
       UsERR [ASCIZ @A@]RR [ASCIZ @A@]KKPQ KSN	  v1G3
	UETYPE [ASCIZ A]PE Kc&:=P LDP"LHP!LLP @LPP  LTP LXP$M
eI7P M@P 'M$,\YP'M&d<YP 6M&d^ 1H1	IFNB <A>Q,<	UFILE [ASCIZ \pA\]
>
	IFB <A>,<	UFILE [0]	
>
UFILE [0]	
>M&fyP $M,,*sQ M,,HSQ  M,,IQ M,,YQ M,-ZQ  M,- M,-<Q @M,-h6Q M,.
TQ M,.
WQ M,.-7Q M,.MQ @M,.[RQ M.5H3Q M.D@Q M/Q M/\xQ M/Y9Q M/%I7P M8,Q M8,\Q M8,kxQ M8-98Q  M8-;QQ M8-h:Q @M8-i3Q M8-jxQ @M:|I< (IJJ	IFNB <A>(i,<	UFNODE [ASCIZ )\A\]
>
	IFB <)(A>,<	UFNODE [0]	
>
FNODE [0]	,PP%RMJ,\P 4MJ.@P MJ.:=P pO&8; m1FkASCIZ \AEXE\ASCIZ \AEOexY L1Lc
   IF2,<
	XGLOBS>IF2,<O3F8t dF#
	SEARCH d9QSRMAC,GLXMAC,ORNMACC,GLXMAC,ORNO?I3 dyF)
	OPDEF eA [<B>]
	INTERN AB>]
	INTERNOJ~\P ON=`P ON~	 eYF/
	OPDEF eyA [B]
	INTERN A
	.NODDT A OOI7P OR g)F3
	CALL [	f9MOVEI A,A	
		CALLRET %GTB]	
AOR%K@P 
Qf )Hx	IFNB <A>I,<	UHELP [ASCIZ \hA\]
>
	IFB <A>,<	UHELP [0]	
>
UHELP [0]	
>Q&=
P ?QO%X<P 
S,(: nqFw	SKIPN BATCHF
	JRST A
St(: n1Fs	SKIPE BATCHF
	JRST A
SMm@PS'$:P (SB-3P% SB:P 
SBlP&BSBX<P SB|P ,SB}YP%0SP 4K b`
	T <A>,B,C,D!CM%INVVK0aJMmSS0 4qK*c
	TV <A>5!,B,C,D!CM%INVB,C,D!CM%INVVK#0M%INVU
d[@P U,kP  U^+@ qG	
	ERCAL RJWARN
	ERCAL RWNy $Y<-3P Y0 oqF	MOVX A,B
	MOVX A,Y+y sQG
	ULERRO [ASCIZ@A@]ROYP	Y`PCZ \ A\]
>
	IFB <A@>,<	ULINE [0]	
>
ULINE [0]	
>Y>=ySP Y?&=`P YXtH:P YXt[sP YXt\qP YXuP YXuP YXu}SP YXvvP YXv{P YXvP YXvLXP [E)WP 4[<{P [&=`P [2-`P [2u0P [2|pP [FL@P ]fL`P ]sQ ]<` i1FKIFN NEWFSWIFN NEWFSW]<l{P ]FL`P ]<`P 
]&:P ]&=`P ]6)yP  ]7<P ]>&:=P ]>-Xy kqF_IFE EMCSSWIFE EMCSSW]>N9  vqG7
	UNOI [ASCIZ @A@]OI [A]>dpQ ]>t]s iqFOIFE NEWFSWIFE NEWFSW]?Y jqFWIFE SEDSWYIFE SEDSW]?H: lqFgIFE STATSWIFE STATSW]?FKR hqFGIFE XTNDSWIFE XTNDSW]CPP ]Nn	yP ]S'2P _' QI	IFNB <A>q,<	UOCT [ASCIZ \A\]
>
	IFB <A>0,<	UOCT [0]	
>
	UOCT [0]	
>
a:.|RQ@PB5IQ`aCPQJPWh6QKb,0`@`D@$`H@$`L@ `P@ `T@ a49VQ a6Q  a6LQQ @a<+P a<,xP a<,zP$@ad:P 
	UPROMPT [ASCIZ @A@]PTbD@ bH@ bL@ cNd[@P @cV~I< $QJ+	IFNB <A>$q,<	UQUOTE [ASCIZ %\A\]
>
	IFB <%0A>,<	UQUOTE [0]	
>
QUOTE [0]	e&:x fyF7JRST RSKP5JRST RSKPe2N=P&Be::=P e:YVP de:|I< )qJU	IFNB <A>*,<	URNODE [ASCIZ *0\A\]
>
	IFB <*PA>,<	URNODE [0]	
>
RNODE [0]	
e;P g~,{P g  j1FSIFN SEDSWUIFN SEDSWg&=`P gYVP g&.,{P g2: 9H	IFNB <A>Y,<	USLASH [ASCIZ x\A\]
>
	IFB <A>,<	USLASH [0]	
>
SLASHg[0]	 
QH[	IFNB <A>
q,<	USTAR [ASCIZ \A\]
>
	IFB <A0>,<	USTAR [0]	
>
USTAR [0]	
>gR@Nl1FcIFNRSTATSWIFN STATSWgRL{P gS:=P tgS yI
>
	IFB <A>X,<	USTR [0]	
>
	USTR [0]	
>
gV;v qQG	IFB <B>,qq<
		USUBCO [	A
				0]>
	IFNB <r0B>,<
		USUBCO [	A
				B]>
gVoHP gVoHP gVo
{P g^N:=P ggH6P h /1KbP
	..BITS=/a=0
	IFNB <B>,<.0.BITS==B>
	IFB 0 <C>,<$FOO==.A>
        IFNB <C0`>,<$FOO==C>
IFE1 D,<XWD [ASCIZ @1 A@],[..BITS!$FOO1@]>
IFN D,<XWD [1`D!CM%FW
		ASCIZ2 @A@],[..BITS!$FOO]>
..BITS!$FVH	0Ri 5aK6
IFNB <B6>,<%%X==B>
IFB 6 <B>,<%%X==.A>
6@	[	CM%INV!CM%ABR!6`CM%FW
		ASCIZ /A/],,%%X
IZ /iP iI  7!K@
	Z			;FI7ALLED IN BY NEXT T7`END
	..T==.			;U8SED BY NEXT TENDED BY NEXT TENDi%I7P i]K\P i
e<}P tit@ 8AKN
       .8a.U==.
        RE9LOC ..T-1
	..U-.9 .T,,..U-..T	;FILL9@ IN FIRST WORD OF9` TABLE
        RELOC ..U      Ri&l^ 1J	IFNB <A>Q,<	UTIME [ASCIZ \pA\]
>
	IFB <A >,<	UTIME [0]	
>
UTIME [0]	
>i. @i.,;sQ  i/$\SQ iJ x1GE
	UTRAP [xQ	A
		ASCIZ @B@]
		ASCIZ @B@iK:P iRNK cF
	TITLE c9A
	SEARCH MACSYMcX,MONSYM
	SALL
	GGLOBS
	SALL
	iS<;qP iS<mzP iS=-P iS=[rP iS=\uP iS>VP iS>;VP iX 2AK
IFB <C>2a,	T <A:>,B,.A,3D

IFNB <C>,	3 T <A:>,B,C,D
A:>,B,C,D
 Uu1TYPE[ASCIZ`A]PE[ASCIZA]j.,@.j8$\Y8k=tk$L@kLt>kD@pkl\YXk}Kwlk}[0dkkHk&+WDk: @k,0Fk,`Zk.` Vk/
XX SLASH{Q	
XX BSLSH	
XX {pDASH		
XX FILE		|
XX CTRLE	
XX D|0EC		
XX CRR		
X|PX STAR		
XX WORD|p		
XX DT		
XX H}ELP		
XX OCT		
}0XX STR		
XX DEV	}P	
XX CMERR	
XX }pDEF		
XXUSER		
XX USERS	
XX DI~0R		
XX DIRS		
X~PX COMMA	
XX LINE~p		
XX DOT		
XX TIME		
XX COLON	0
XX DEXT		
XX CPHAR		
XXpQUOTE	
XX ACCT		
XX DTIV		
XX FNODE	
0XX RNODE	
XX DTPP		
XX DTR		
XX ADDR		
		
XX k:} &k>@ RkC{8 (kG-} rkJuy zkN.,| AIB	IFNB <A>a,<	UUSERS [ASCIZ \A\]
>
	IFB < A>,<	UUSERS [0]	
>
USERS [0]	I7	IFNB <A>9,<	UUSER [ASCIZ \XA\]
>
	IFB <Ax>,<	UUSER [0]	
>
UUSER [0]	
>kNdt <kO$@ JkO&  TkO,(w :kRMY  jkS 6kSN	  "kW\@ \kW\Y ^k^~) Lo"/	1P o"fPQ o?N yHe	IFNB <A>
,<	UWORD [ASCIZ \
8A\]
>
	IFB <A
X>,<	UWORD [0]	
>
UWORD [0]	
>q0 gqF?IFN XARCSW,IFN XARCSWq<{P qd@Q xqY P%2q\P ,q\P q\}P  qexY LqU

	XLISTM
	.XCREF

DEFIM0NE QEXT (SYM)<
	MPIRP SYM,<
	IFNDEMpF SYM,<EXTERN SYMN
		SUPPRE SYM>>>N0

   STAT,<
QENPXT <STPTR>
   >;NpSTAT

QEXT <SJLOEN,JTAB,JLEN,CBLOO0CK,TRAPU,TRAPD,SAOPVSP,SAVCM,RESCM>
QEXT <CLRALL,CLRPBIT,JSBDEF,SETALLP0,SETBIT,SETTRP,COPPPBTS,RESACS,SAVACPpS>
QEXT <SKPON,TQRPPSI,JTAB,SKPNAZQ0,TRPOKF,TSTOPF,MRQPKTRP,GETLPC,FOWNEQpR,TFILEF,TOPENF>
QEXT <SNDPDB,MYPR0ID,QSRPID,MDAPID>RP
QEXT <GETPID,GQRpPID,QUASND,SNDMSGS,SNDMS1,IPCRCV,GQS0SRPD>
QEXT <IPCOSPN,IPCOFF,IPCINT,CSpHECKM,IPCHEK,NOWPTTR,IPCRCF,IPCWTF,T0IPCALF,IPCFND>
QTPEXT <UNIQUE,IPCTBTpL,IPCAGE,IPCFGS,IUPCCTL,INFPID,OLDIU0DX,IPCFLM>
QEXT UP<DGFRKS,SETENT,SEUpTGO,GETENT,WAITF>V
QEXT <.MAKE,.TEV0CO,.TV>
QEXT <SPVPEEDA,SYSDWN,PRACCVpT,CKSTAR,GETDVN>
QEXT <SBLOCK,FBLW0OCK>
QEXT <%%LVEWPR,%%RVER>
QEXT <WpRJWARN,REWIND,CJDXEV,OPNMAG>
QEXT X0<ABKCNT,INFTRM>
XPQEXT <%GETER,DGETXpER,.EDIT,.EDITC,.YEDITP,CSVCC,EDSVBY0,TECSVB,CMAGN>
QYPEXT <TOUT,TOUTD,TYpBOUT,TSOUT0,USRCNZT>
QEXT <DWNTYP,Z0SNBLKS,SSIZE,$CHFZPDB,USRNAM,DFUSER,ZpTTYUSR>
QEXT <.P[,.PP,COMAND,COMSI[0X,PRGCEL,CIPF,CLF[P,MPENDF,NACL,GLOA[pDS,CLSON,BEGINP,S\VPRMT,ECHCMD>
QE\0XT <HELPSN>
QEXT\P <GETDIR,RELDIR,G\pETDRP,DIRINI>
QE]XT <.STRST,VERPNT]0,%VERSI>
QEXT <.]PVERSI,EXECV,CMDIN]pI,MONSTA,SUBSTA,.^JOBST,.RUNST,.MEM^0ST,.DSKST,.ERRST,^P.FILST,.INFOR,.PI^pSTA>
QEXT <.PUSH_,.POP,.UNATT,.IND_0IR>
QEXT <INFER,_PUNMDIR,$CONTI,$LP_pTST,GETLPT,FINLPT`,$REENT>
QEXT <$`0START,..CONT,..RE`PEN>
QEXT <MFOUT,`pMFSET,MFINP,MFINPa0>
QEXT <SIXPRT,a0.AVAIL,$OPEN7,$OPaPENF,$ERSTR,OPNERRap,ERRFIN,CRIF,LM,%bMESS,PNTMES>
QEXb0T <BEFORE,DEVLUP,bPECFORK,EDEFIN,EOLbpRET,EPRINT,ESET,.cSPEAK,ECEASE,MESMc0ES>
QEXT <STAYF,cPERESET,TRYGTJ,DOGcpET,TRYGTS,TRYGTO,dTRGTV1,WHY,$GET2,d0$GET0,CRSCAN,$GTFdPDB>
QEXT <..STRTdp,RSPTR,.ACCOU,.ADeVIS,.APPEN,.ASSIGe0,.ATTAC,.BREAK>
ePQEXT <.CHANG,.CLEepAR,.CLOSE,.REMAR,f.CONNE,.CONTI,.COf0PY,.CREAT>
QEXT fP<.ACCES,.ENDAC>
fpQEXT <.DAYTI,.DDTg,.DEASS,.DEFIN,.Dg0ELET,.DETAC>
QEXgPT <.DIREC,.TDIRE,gp.FDIRE,.VDIRE,.DIhSAB,.DISMO>
QEXTh0 <.EDDT,.ENABL,.EhPXPUN,.FORK>
QEXThp <.GET,.HELP,.SENiD>
QEXT <.LNLIS,i0.LOGIN,GSR,SSR,.LiPOGOU>
QEXT <.MERipGE,.MOUNT,.PRINT,j.PROTE,.PRINT,.SUj0BMI,.IPR,.IBR,.IRjPR,.IMR,.MODIF,.CAjpNCE>
QEXT <.PLOTk,.SDP,.SDPL,.SNDPk0L,.SDS,.SNDCS,.SNkPDS,.SNDP,.SDC,.SDkpT,.SNDCP,.SNDTP>
QEXT <.SDCS>
QEl0XT <$DEF>
QEXT <lP.IDC,.IDPL,.IDCS,lp.IDP,.IDPRT,.IDS,m.IDALL,.IDPRG,.IDm0TAK>
QEXT <.PUNCmPH>
QEXT <.QUIT,DmpOATI>
QEXT <.R,.nRECEI,.REENT,.REFn0US,.RENAM,.RESET,nP.RUN>
QEXT <.CSAnpVE,.SAVE,.SET,.SToART>
QEXT <.TAKEo0,.TALK,.TYPE,.TRAoPNS,TYPE1,.UNDEL,.opUNMOU>
QEXT <ASTpTJ,CHKDAL,CMDIN2,p0CMDIN4,CIN3,EXEC,pPJOBREN,JOBSA,JOBSppYM,JOBDDT>
QEXT q<XEND,.NPAGS,EVLEq0N>
QEXT <LEVTAB,qPREE,SUPER,.JOBSY,qp.TEXEC>
QEXT <RErADY,READY2,FIELD,r0FLDSKP,CFIELD,GETrPTER,REPARS,SETT20rp,SAVT20,SAVNAM,SEsTMOD,GETMOD,SETPRs0G>
QEXT <%KEYW,GsPETKEY>
QEXT <PRVspCK>
QEXT <%NOI>
QEXT <%SBCOM>
Qt0EXT <CONF,FCONF,FtPCONFA>
QEXT <SPRtpTR,BITS>
QEXT <CuIOREL,SETIOF,TINPu0F,NOTIO>
QEXT <%uP$TYPE,$CTYPE>
QEupXT <COUTFN,CSAVFNv,SPECFN,CPFN,CPFNv0A>
QEXT <.INFG,IvPNFGNS,TYPFLS,$INFvpGX,DIRARG>
QEXT w<TYPIF,TYPOK,GNFIw0L,NXFILE>
QEXT <wPDEVN,CONST,INDT,LwpBLSKP>
QEXT <DIRxNAM,DIRNMX,CURNAMx0,CURNMS,USRNMS,STxPPDIR,STPUSR>
QEXxpT <ATSAVR,TOCT,OCyTCOM,OCTLST>
QEXy0T <BUFFF,GETBUF,RyPETMEM,GETMEM,RETBypUF,STREM,XFRINI,FzREINI,BCOUNT,GETNz0OD,CSBUFP,DICT,XDzPICT,BUFFS,XBUFFS,zpGTBUFX,GETSIX,GET{SXB,GETASC,FIXPT>{0
QEXT <NOECHO,DO{PECHO,LTTYMD,FIXIO{p,RTTYMD>
QEXT <%|PRINT>
QEXT <COU|0TC>
QEXT <MAPPF,|PFREL,RANDOM,TYPEX|pP,TYPADD,GINSTR,P}INST,RINST,EVAL>
QEXT <SYMF,SYMOK}PF,SOFF,SYMBA,SYME}pA,SYMBEG,SYMEND,L~ASTP,NSYMS,SYMBF>~0
QEXT <LOADF>
Q~PEXT <STOREF>
QEX~pT <%GTB>
QEXT <DING,CERR,NIYE,NIM0,SCREWUP,JERR,JERPRC,CJERR,JERRE,CJpERRE>
QEXT <%TRAP>
QEXT <AUTOLO>0
QEXT <%ERR,%$ERPR,%.$ERR >
QEXT p<RERET>
QEXT <%ETYPE>
QEXT <RLJF0NS,UNMAP,JFNSTK,CPLZFFF,JFNRLA,GTJFpS,RJFN,PION,PIOFF,ACTRCF,INTDF,IIN0TDF>
QEXT <FLOATP>
QEXT <CSZ1,CSZp2,CSZ4>
QEXT <CMDACS,REPARA>
QEX0T <CIJFN,COJFN,JBPUFP,.JBUFP,.J,JBUpF,CJFN1,CJFN2>
QEXT <TAKLEN,TAKCU0R,TAKDEF,TAKJFN,TPAKBTS,PUSHIO,ALONpOI,ECHNOI>
QEXT <INIFH1,INIFH2>
0QEXT <DPPT,DPSTK,PDSPT,DSSTK,DCPT,DpCSTK,DPLPT,DPLSTK,DTPT,DTSTK>
QEX0T <EOFDSP,EOFJER,PDATDSP,ILIDSP>
QpEXT <CIDLYF,PAXLFL,CCFLAG>
QEXT <0CINITF,LOGINI,SYSPMF,LOGDAT,FILINI,pTAKEIN>
QEXT <PRVENF,MESMSF,CUSRN0O,LIDNO,JOBNO>
QPEXT <EXDPF,EXDPLCp,FSTLGN>
QEXT <F	ORK,RFORK,DDTFLG,	0NPAGE,EFORK,BATCH	PF,PROG,SNDPRG,SDP	pROG,GETFB1,ANNKEP
,INDQUS>
QEXT <S
0TRTIM,TTYACF,PTTY
PAC,ALOST,CJPTIM>
p
QEXT <ITTYMD,PTTYMD,ETTYMD>
QEXT0 <CERET>
QEXT <CPTUUO>
QEXT <SSTApCK>
QEXT <ERCOD>

QEXT <USERNO,MC
0OJFN,OUTDSG,TYPGR
PP>
QEXT <DEXTBL>
p
QEXTL<PD,INISTKBU
QEXT <TEXTIC,TEX0TID,TEXTIA>
QEXTP <PPATS,PPAT,PAGEpN>
QEXT <LEV1PC,LEV2PC,LEV3PC,PCT0AB>
;QEXT <$CTRLPA,$CTRLR,$CTRLV,$pCTRLW,$CTRLX,$EOL,$DASH,$CONT,$RUB0>
QEXT <$FORMF,$PLF,$CONT,$TDENS>
QEXT <USEPSI,ILIPSI,EOFPSI,DATPSI0,ICLEAR,CCPSI,TLMPPSI,ALOPSI,COBPSIp>
QEXT <ADVFLG,SAVPGM,FIXON,ADVTN0M,ADVMES,BREAK1,EPSCPSI,JFNSIL,QTAPpSI,QTADSP>
QEXT <CUUO>
QEXT <ERR0ET,NESC>
QEXT <FPSTAT>
QEXT <ERRMpF>
QEXT <CSBUF>
QEXT <%EDAYT>
Q0EXT <ACCT,PASSX,PPASWD,PASLIN,PASFLpD>
QEXT <CHRTBL>
QEXT <JOBOPC>
0QEXT <.BACKS,.SKIPP,.EOF,.REWIN,.UNpLOA>
QEXT <CSCAN>
QEXT <.CREF,.E0XECU,.COMPI,.DEBUPG,.LOAD,OCCLF,GOTpO2,CLOPAT,DOCCL,DOCC1,DOCC2>
QEXT0 <CSVC>
QEXT <MAPLCHK,MALWEN,MINT0p,MWATCF,MWATCH,MAILF> ;MAIL WATCH
QEXT <SUBBP>
QEPXT <NETRDY>				;ApRPANET
QEXT <QTIMES,SNAMES,SYSVER0,JOBRT,TTYJOB,NETPRDY>
QEXT <GETAMpT,CHKPTY>
QEXT <LRFSTS>
IFE STAN0SW,<
QEXT <.USENPD>			;NOT USED ATp STANFORD
>;IFE STANSW
QEXT <EDT0FIL,EDTINF,EDTCREP,EDTOUF,EDTCFM>
pQEXT <..CD>			;[NIC1055]

;TERMI0NAL-RELATED GLOBAPLS

QEXT <$TERMpI,$TTYP,$TERNO,TTYPTB,BLNKTB,NTTYP0S,.TTY3>
QEXT <.PT33,.T35,.T37,.TIp,.FLAG,.FORMF,.FULLD,.HALFD,TTYHLP0,.IMMED,.INDIC>
PQEXT <.LA120,.LA3p0,.LA36,.LA38,PLENTH,.LINE,.LOWER,0.TERNO,.PAGE,.PAUPSE,.RAISE>
QEXT p<.SPEED,.DFLT,.TA BS,.TRMNT,.TTYPE, 0.VK100,.VT05,.VT1 P00,.VT102>
QEXT  p<.VT125,.VT50,.VT!52,.VTH19,.LWIDTH!0,TTYNTY,.TTH19>
!PQEXT <RTTFLG,.INH!pIB>


; CRJOB/"PRARG

QEXT <CR"0PRA,..STCR,MESS>

; Archive syst"pem

QEXT <.ARCH#I,CANARC,.DISCA,.#0RETRI,FTDBLK,ARCB#PLK>

; Extended#p features

QEXT$ <.RDIRE,.WDIRE,.$0QD,ALRCHK,MALCHK,$PIITPSI,TYPING,AUT$pOF,IITSET>
QEXT %<MALBUF,MWATAT,MW%0ATCT,MWATDR,MWATW%PR,MWATN,MWATN0,AL%pRTIM,ALRTMS>
QEX&T <RUNFK,IDFORK,E&0DFORK,FRKTAB,SLFT&PAB,FRKNMS,KEPNMS,&pFRKDEF,SFKNAM>
Q'EXT <.FREEZ,.UNKE'0E,.NAME,.KEEP,UTT'PYMD,RFTYMD,FTTYMD'p,REASON>
QEXT <R(STFK,REPH,STEPH,R(0EPH1,.ERUN,.BLANK(P,BLANK1,KEFORK,GE(pTILI,DWNPNT>
QEX)T <.DO,.KMIC,MICF)0RK,PAGEMI,MICFPG,)PMICPAG,GETPAG,USE)pPSM>
QEXT <.GOTO*,.BACKTO,.ERROR,.*0IF,.NOERROR,.OPER*PATOR,.NOOPERATOR>*p
QEXT <ADDNAM,.N+OLM,.KFRKC>
QEXT+0 <CCKEEP>
IFN ST+PANSW,<
QEXT<LGXI+pNI,FLXINI,ATTINI>,	;USED BY EXEC0
,0QEXT<MRPFLG>			;U,PSED BY EXEC0, EXE,pC1
QEXT<DWNPNT,L-AZY,.MAP,.UNMAP,.-0KK,TTYINI> ;USED -PBY EXEC0
QEXT<LG-pOFLG>			;USED BY .EXEC1
QEXT<BINTY.0P,TYPFLO>		;USED .PBY EXEC2
QEXT<SN.pDCMD,.ECHO,.ERSTR/,.FINGE,.MAIL,.RE/0PLA,.SDOWN> ;USED/P BY EXECCA
QEXT</pPERUN>			;USED BY0 EXECIN
QEXT<GOT00OR>			;USED BY EX0PECED
QEXT<LOGOU20p,TRADIX>		;USED B1Y EXECSU
QEXT<.P10RMNT,.TMPRY,.SVBA1PK>	;USED BY EXECS1pE
QEXT<.PROMP,SE2TPMT,REDPMT,PCECS20T,DIVPMR,DIVPMS,D2PIVPME,DIVPMU> ;US2pED BY EXECSE
QEX3T<FRKNM0>			;USED30 IN EXECP
QEXT<.3PSLEVL,SETLVL>		;U3pSED BY EXECSE
QE4XT<.NWFRK>			;USE40D BY EXECSE
QEXT4P<RNFORK>			;USED 4pBY EXECSE AND EXE5CP
QEXT<.CANON>	50		;USED BY EXECQU5P
IFN LOTSW!GSBSW5p!CSLISW,< ;KEEP L6OTS AND GSB SYMBO60LS TOGETHER!
QEX6PT<.OPEN>			;USED 6pBY EXEC0
QEXT<.I7QUEU,.IRESE,.ALLO70C>	;USED BY EXECI7PN
QEXT<RESERV>		7p	;USED BY EXEC1, 8EXECIN
QEXT<.IIB80M6>			;USED BY EX8PECCA, EXECIN (GSB8p ONLY)
QEXT<.HEL9PM,.WHO,.WIZ>		;E90XEC0, EXECCA.
>;9PIFN LOTSW!GSBSW!C9pSLISW
QEXT <.BAC:KRB,.T43,.ADM3,.A:0LTO,.AMBAS,.ANNAR:P,.ANSI,.AVT,.CONC:pE,.DATM2>
QEXT <;.DATAM,.ESPRT,.FR;0EED,.FREE2,.GILLO;P,.HAZEL,.HP2,.IBM;p,.NVT,.SOROC>
QE<XT <.SUN,.TEKT3,.<0TEKTR,.TELER,.TEL<PEV>
IFN PUPSW,<	<p	;PUP VARIABLES F=OR SYSTAT
QEXT<P=0UPFLG,PUPLOW,PUPH=PGH,PUPBUF,$NVTPUP=p,$PUPFPT,$PUPBUF>>
QEXT<.IETH>			;>0INFO ETHERNET HAN>PDLER.
>;IFN PUPS>pW
>;IFN STANSW
?
;Programmable C?0ommand Language
?P
QEXT <CTBL1,PCC?pURC,PCFLAG,PCTXFR@,PCSFRE,PCLSTF,PC@0VVAL>
QEXT <PCFL@PDB,.DECLA,.UNDEC,@pPCMXCT,PCMPOP,PCMAPOS,PCMPRS>
QEXTA0 <PCINIT,PCCCPL,PAPCIDFV,PCIUDF,PCIRApUN,PCEXCT,SUBNAM>B
QEXT <PCMPSI,PCB0MPSO,PCIPSO,PCPOTBPP,PCPRGR,WFORKX,.BpPCLOB>
QEXT <PCICINF,SINVAR,SSTVARC0,PCISGS,.PCLVR,PCCPIDGS,PCICLP>
QEXCpT <PCCWKE,PCRPAS,DPCLDCO,PCIWEV,$SDD0EF,PCIGEV>
QEXT DP<CIN2,PCIDFS,PCIFDpGS,WAITA,PCLPMT>
QEXT <PCIPSV,PCFE0LDP,PCLGST,CUSTMFEP,PCWAIT,READ1>
IEpFN STANSW,<
QEXTF <PCRNFK,PCFORK,PF0CLNAM,PCCIPF,NPCLFPIO,.IDDCL,ORIFLG>Fp	;CM156
>;IFN STGANSW
QEXT <CHNS,G0CHNTAB,CM1DB,CM1DGPBE,CM1XL,CTBL2>
GpQEXT <TDEFAU,$SETHO,$SETN,$SFILE,$SH0FNO>
QEXT <$RSFDHP,$SVFD,$INFO>
QEHpXT <CRDSET,IVOL,NITRAP,SETSRM,SPLINI0F,SPLSET>
QEXT <IPSYSINF,TAPINF,TRMIpPNT,.ADBRK,.ADDREJ,.ALERT>
QEXT <.J0ALRST,.ARSTS,.AUTJPOM,.CIDLY,.CTRLC,Jp.DEFAU>
QEXT <.DKEPOS,.ENTRY,.EXAMK0I,.EXECM,.FEXP,.FKPILEV>
QEXT <.FLIKpNX,.FLONX,.FPROH,L.FRESI,.IARPA,.IDL0ECN>
QEXT <.INVILPS,.LOCAT,.MALST,.LpMWATC,.NODEF,.NOTMIM>
QEXT <.OFL,.M0PAC,.PAXL,.PRESE,MP.SDIR,.SETNO,.SFIMpLE>
QEXT <.SFNO,N.SISTA,.TAPE,.TERN0MI,.TIME,.TKD>
QNPEXT <.TRAP,.TYPEONp,.VISIB>
QEXT <.OEPHM,.FRKST,SAVSWO0I,.CTRAC,.ORIGI,.OPSDDCL>
QEXT <.INOpDEF,.SEDEF,.STMLMP,$SET0>
QEXT <.SP0AVT,CMDCHT,CMDCHRPP>
QEXT <MSEPSI>
QEXT <RESET0,.REQSE2,.RESS1,.RESSTQ0>
QEXT <$FRKNM,$QPNODEF>

;NIC spQpecific definitionRs

IFN NICSW,<
QEXT <.HOST,.NICRP,.REGIS,.TACNE,.QRpUERY,.WHOIS>	;[NISC1000]
QEXT <.KKS00,NICINT,NXTSPP>	SP		;[NIC1000]
QEXSpT <.INITI,.PEEK>	T			;[NIC1001] ^EIT0NITIALIZE & PEEK
QEXT <.IDDT,.NO,TpUFORK,IDNAME>			;U[NIC1002] IDDT anU0d NO IDDT
QEXT <UP.BACK,LSTCON>				Up;[NIC1003] BACK CVOMMAND
QEXT <.LIV0NEP>					;[NIC101VP2] LINEPROCESSOR VpTYPE
QEXT <OPERFW>					;[NIC1016] W0MIT ATTACH CODE
WPQEXT <.SEHST,.INHWpST,.DOHST,HCNT,CNXUM>		;[NIC1017] HX0ISTORY SYMBOLS
QXPEXT <HPTR,SETPMT,XpCIN0>				;[NIC101Y7] HISTORY SYMBOLY0S
QEXT <COP1A>		YP			;[NIC1021] MAKYpE RENAME WORK
		Z				;[NIC1021] ACZ0ROSS STRUCTURES
ZPQEXT <.AUTOK,AUTOZp>				;[NIC1033] A[UTOKEEP STUFF
QE[0XT <.CALCU,.CALOV[P>				;[NIC1034] C[pALCULATE
QEXT <L\AZCON>					;[NIC1\0035] LAZY CONNECT\P
QEXT <.TERM0>		\p			;[NIC1041] SET] TERMINAL
QEXT <]0ETERMI>					;[NIC]P1044] SET TERMINA]pL
QEXT <.SAFET>	^				;[NIC1053] SA^0FETY COMMAND
QEX^PT <.ASDEV>					;[^pNIC1057] @I DEVIC_ES
>;IFN NICSW
_0
IFN CTLLSW,<
Q_PEXT <ICLRSC>
>
_p	.CREF
	LIST
   REF
	LIST
  qRt@ h1FCIFN XTNDSWIFN XTNDSWqRtL{P q` yGW
OPDEF Uy1A [<%%NUUO>B12]
yP%%NUUO==%%NUUO+1
DEFINE AX(HELP)z
<	IFNB <HELP>,<z0	UA [ASCIZ \HELPzP\]
>
	IFB <HELPzp>,<	UA [0]	
>
>
A [0]	
>
sd@P't@ 	+y tG!
	U$ERR [ASCIZ @A@]RR [
v]7P  \k ;)K\
	$FKFLAG;I==<Z 0>		
	A (<B>,0C,D)A (<]7 <QKg
	$FKHAN=<q=<Z 1>		
	A (<B>,1C,D)A (<^(2 =9Km
	$FKRADD=Y==<Z 2>		
	A (<B>,2C,D)A (<^)9 ?	Kz
	$FKRESP?)==<Z 4>		
	A (<B>,4C,D)A (<^+2 >!Kt
	$FKRMES>A==<Z 3>		
	A (<B>,3C,D)A (<.,W tQG%
	U.$ERR [ASCIZ @A@]RR &
P V
P V
xP VP VP lzP 
l9VP l;0P lI;P lJ9P lj6P lkP lkP mTP mTP m9<P mkrP mktP mm6P mm<P 
myTPnzP&n=tP&nH2PJnKuPK	nNPKn\9PR	n\yP}S@P \P 98P L\YP M)WP MI7P N=P \YP ]h6P ]}wP ^