Google
 

Trailing-Edge - PDP-10 Archives - BB-BT99V-BB_1990 - 10,7/acct/actprm.unv
There are 22 other files named actprm.unv in the archive. Click here to see a list.
x
,Uk@P C$j6Q C$H2C+s 8
 AE	VRS,X-1,PD.NMD!PD.CND	x
 AE	PPN,-1,PD.NMD!PD.CND	
 AE	N8AM,.AANLW,PD.CND	X
 AE	PSW,-.APWLWx,PD.NSL!PD.UNP!PD.CND!PD.NDI	
 AE8	PRV,-1			
 AE	PXRX,-1			
 AE	LGTx,-1			
 AE	COR,-1			
 AE	IPC,-1	8		
AE	ENQ,1			
 AE	CTX,-1			
 xAE	WCH,-1,PD.UNP		
AE	ACC,-1			
 AE	REQ,-1			
 XAE	SPL,-1			
 AEx	SCD,-1			
 AE	EXP,1			
 AE	DEF,8-1,PD.CND		
 AE	XMAP,.AMPLW,PD.NMDx!PD.CND!PD.NSL	
 AE	FLG,-1,PD.NMD8!PD.CND	
 AE	FAIX,1,PD.NMD!PD.CND	x
 AE	PCT,1			
 AE	LPC,1,PD.NMD!P8D.CND	
AE	PAP,-X1,PD.NMD!PD.CND	
 AE	TIM,1,PD.NMD!PD.CND	
 AE	PGR8,-.APGLW		
 AE	BXOX,-.ADLLW,PD.UNPx	
 AE	PNM,-.APNLW,PD.UNP	
 AE	MA8I,-.AMLLW,PD.UNP	X
 AE	LOG,-.ALFLWx		
 AE	AUX,-.AUMAX,,UGAUX%	
 AE	8ACS,-.AACLW,PD.NMXD!PD.CND	
 AE	DExC,2,PD.NMD		
 AE 	CUS,.ACWDS,PD.NM 8D	
AE	MIN,0			

CAE	MIN,0			Z7P CCi9P CCzP Gx ptGLOB A>Gt:P Gt;8P GtIVP GtkP Gty:P GuP GuP Gv	VP Gv
VP Gv
YP Gv
ZPGv)9PI$qP+P I$;yP I&
P 
[P 
\P 
{P)P I&lYP It<Q It+|Q It;yQ It=P"It=9P!ItI1P$ItI3P It[XP$It^P Ith4Q ItkQ IuQ IuIzQ  IuKsQ  IuLQ  IuX4Q @IuX8P IuZ7P  Iuh6Q Iv8Q IvzQ @Iv	yQ IvVQ Iv
Q  Iv
[Q Iv
\Q @Iv
{Q Iv)8P  Iv8rP Iv<P IvJ6Q IvlYQ @IvxtP!K;%m6P'M$ RI%Ux.ERR.	("?",A,<B>,C,D)%0%MAIN /ACM0umQ @M0wyQ  MRV>9P MS.[yQ O2|  -8BuIRP A,<
-X	IF2,<IFDEF A,<.-xIFN A,EXTERN,<IN.TERN A>>
	     .8IFNDEF A,<EXTERN.X A>
	Q SUPPRESQA>>FSUPPRO3FTI%$V.ERR.	("[",A,<B>,C,D)%2% .+1>
	UVn	@4@UVnFF3

	  LSTF8OF. XCREF

	CDOFX	OTSINI			
	CDO	Fx    			
	CDO	.ZPGAGA
	CDO	.ZPAGN
	CDO	.ZCHNK
	CDGXO	.SAVE1
	CDO	.SGxAVE2
	CDO	.SAVE3H
	CDO	.SAVE4
	CH8DO	.SAVET
	CDO	.HXSV13
	CDO	.SV14
	CDO	.SV15
	CDOI	.SV16
	NT	.RETTI8
	NT	.RETF
	CDOIX	.RETE
	CDO	.AOSIx		
	CDO	.SOS		
J	CDO	.ZERO		
	NTJ8	.POPJ		
	CDO	.SJXTOP		
	CDO	.SAVEJx8		
	CDO	.STKST	K	
	CDO	.TRSET		
	NT	.POPJ1		
	CKXDO	.UD2SC		
	CDOKx	.SC2UD		
	CDO	.LCPUTY		
	CDO	.DIL8E		
	CDO
	CDO
LX
	CDO			
	CDO	CLx%RPRM
	CDO	C%INTMR
	CDO	C%SEND
	M8CDO	C%RECV
	CDO	MXC%BRCV
	CDO	C%REMxL
	CDO	C%CPID
	NCDO	C%KPID
	CDO	N8C%SPID
	CDO	C%MANXXP
	CDO	C%PIDJ
Nx	CDO	C%PIDH
	CDOO	C%SIDX
	CDO
	CO8DO
	CDO

	CDO	OX      			
	CDO	FOx%IOPN
	CDO	F%AOPPN
	CDO	F%OOPN
	P8CDO	F%IBYT
	CDO	PXF%OBYT
	CDO	F%IBPxUF
	CDO	F%OBUF
Q	CDO	F%REL
	CDO	Q8F%DREL
	CDO	F%RRQXEL
	CDO	F%REW
	QxCDO	F%POS
	CDO	FR%CHKP
	CDO	F%INFR8O
	CDO	F%FD
	CDRXO	F%REN
	CDO	F%DRxEL
	CDO	F%FCHN
S	CDO
	CDO
	CDO
	CDO
	CDO
	CDOSX
	CDO
	CDO
	CDSxO	FUNCT.			

	CTDO	      			
	CDT8O	M%ACQP
	CDO	M%TXRELP
	CDO	M%IPSNTx
	CDO	M%NXPG
	CUDO	M%IPRC
	CDO	MU8%IPRM
	CDO	M%AQNUXP
	CDO	M%RLNP
	UxCDO	M%CLNC
	CDO	VM%FPGS
	CDO	M%GMV8EM
	CDO	M%RMEM
VX	CDO
	CDO
	CDO
	CDO
	CDO
	CDOW
	CDO	M%GPAG
	CW8DO	M%RPAG
	CDO
WX	CDO
	CDO
	CDO
	CDO
	CDO
	CDOX
	CDO

	CDO	  X8    			
	CDO	T%TXXEXT
	CDO	T%TTY
Xx	CDO
	CDO
	CDO
	CDO
	CDO
	CDOY8
	CDO
	CDO
	CDYXO
	CDO

	CDO	 Yx     			
	CDO	L%ZCLST
	CDO	L%DLSTZ8
	CDO	L%CENT
	CZXDO	L%CBFR
	CDO	LZx%DENT
	CDO	L%NEX[T
	CDO	L%FIRS
	[8CDO	L%LAST
	CDO	[XL%PREV
	CDO	L%PR[xEM
	CDO	L%CURR
\	CDO	L%RENT
	CDO\8	L%SIZE
	CDO	L%A\XPOS
	CDO
	CDO
\x	CDO
	CDO
	CDO
	CDO
	CDO
	CDO]8

	CDO			
	CDO]X	I%NOW
	CDO	I%EX]xIT
	CDO	I%ION
	^CDO	I%IOFF
	CDO	^8I%SLP
	CDO	I%INT^X1
	CDO	I%INT2
	^xCDO	I%INT3
	CDO	_I%TIMR
	CDO
	CD_8O
	CDO	I%SOPR
	_XCDO	I%WTO
	CDO
_x	CDO	I%HOST
	CDO`	I%JINF
	CDO	I%C`8JOB
	CDO	I%KJOB

	CDO	S%U2DT		
	CDO	S%DT2U
	CDaO	S%DATI
	CDO	S%a8SIXB
	CDO	S%CMNDaX
	CDO	S%TBLK
	CaxDO	S%SCMP
	CDO	Sb%ERR
	CDO	S%INTRb8
	CDO	S%EXIT
	CbXDO	S%TBAD
	CDO	Sbx%TBDL
	CDO	S%NUMcI


	CDO	K%RCOc8C			
	CDO	K%WCOCcX
	CDO	K%SUET
	CcxDO	K%STYP
	CDO	Kd%TXTI
	CDO	K%SOUd8T
	CDO	K%BOUT
	dXCDO	K%BIN
	CDO	Kdx%BACK
	CDO	K%TPOeS
	CDO	K%BUFF
	e8CDO	K%FLSH
	CDO	eXK%OPEN
	CDO	K%ECexHO
	CDO
	CDO
	fCDO
	CDO
	CDO
f8	CDO
	CDO
	CDO
	  LSTON.
YOGP YO%yG jXF
	IFNDEF jxLSTIN.,LSTIN.==0	k	
IFE LSTIN.,<
k8	IFIDN <XCREF><AkX>,<.XCREF>	
		  kx XLIST>		
	LSTIN.==LSTIN.+1STINYO%{G l8Fi
	IFG LSTlXIN.,LSTIN.==LSTINlx.-1	
	IFLE LSTINm.,<.CREF		
		      LIST>
		}[>&[ 

	SALL	
	.DIREC	FLBLS

	SEARCH	ACTSYM		
	SEARCH	G8LXMAC		
;	SEARCHX	ORNMAC		

	PROxLOG	(A)		

	%%ACTP==:%%ACTP		
8
	TWOSEG	400K		
	RELOC	400K		

] &2IFDEF A,<& A=A> IFNDEF A,<A==<B>>F A,]P pvCDO A `P at;RQ at^Q au\uQ auiQ @auk2Q aulvQ  av-Q @av[XQ av|RQ xa+= 5aJ}Ks 	#XK;

	SALL		#x			
	LSTOF. XCRE	$F			

	%%.GLX==	$8%%.GLX			
	GLXVR	$XS==GLXVRS			

		$xIFNB <A>,<%%.MOD	%==SIXBIT/A/> 
		%8IFNB <B>,<%%.OTS	%X==SIXBIT/B/> 
	%x
	GLOB	I%INIT			

	TOPS10	<			
	&8		SEARCH	UUOSYM			&X
		%%UUOS==%%UUO	&xS		
	>				

	T	'OPS20	<			
		SEA	'8RCH	MONSYM		
;			'X%%MONS==%%MONS		
	>				

	IFB <	(B>,<			
		IFN G	(8LXPUR,<
			.TEXT	(X	|,REL:GLXLIB/SEA	(xRCH/REQUIRE:I%INI	)T/SEGMENT:LOW|
		)8	>			
		DEFINE	$	)XDATA (NAM,SIZ<1>)	)x,< 
			NAM:	BLOC	*K	SIZ
		>			
			*8DEFINE	CDO (X),<G	*XLOB X> 
		DEFINE	*x	NT(X),<CDO X>	
	+		LIBVEC			
	>			+8		

	IFNB <B>,	+X<			
		CHKEDT (	+xB)		

	IFDIF <	,B><INI>,<		
		IF	,8N GLXPURE,<.PSECT	,X .HIGH.> 
		IFE 	,xGLXPURE,<		
			T	-WOSEG	400000	
			-8	RELOC	0	
			REL	-XOC	400000	
		>			-x	

		DEFINE $DA	.TA(NAM,SIZ<1>),< 	.8
			IFN GLXPURE,	.X<.PSECT DATA> 
		.x		IFE GLXPURE,<RE	/LOC> 
			IFNDEF 	/8B%D,<B%D::! B%	/XDL==:0>
			NAM:		/xBLOCK	SIZ
			B%	0DL==:B%DL+SIZ 
	08			IFN GLXPURE,<.	0XENDPS DATA> 
				0xIFE GLXPURE,<RELO	1C> 
		>			

	I	18FDIF <B><OTS>,<		1X	
		DEFINE	CDO (	1xX),<GLOB X> 
		D	2EFINE	NT(X),<CDO 	28X> 
		LIBVEC		
	2X	>			

	>			
		2x

	IFIDN <B><I	3NI>,< 
		DEFINE		38$DATA (NAM,SIZ<1>	3X),< 
			NAM:	BLO	3xCK	SIZ
		>			
		4>				
	>

	LST	48ON.				

	GLOB		4X<.POPJ, .RETT, .R	4xETF>	
	OPDEF	$RE	5T	[POPJ	P,]	
	OP	58DEF	$RETT	[PJRST		5X.RETT]	
	OPDEF	$	5xRETF	[PJRST	.RETF	6]	
	OPDEF	$RETIT	68	[JUMPT	.POPJ]	
	6X	OPDEF	$RETIF	[JU	6xMPF	.POPJ]	
	.NO	7DDT	$RET,$RETT,$R	78ETF,$RETIT,$RETIF
$RETIT,$RETIFi?4( &`6IFN FTUUOS,IFN FTUUOSi?4H ' :IFN FTJSYS,IFN FTJSYSjP o` Si%V.ERR.	("%",A,<B>,C,D)%1%.+1 A,EpP 	H   prPx 
			A:	BLOCK	B
		A,E%pl1NIT	J.@ ,~	J.I@ 5	J.J3 4@	J.J: 5@	J.M 5
t{P 
u[rQ C&
V

=Q 
.[yQ <3
0P 
@P ,qp 
,yp ,<p ,+|p ,;yp ,=p 	,=9p ,I1p ,I3p 
,h4p ,kp -p -Izp -Ksp -Lp -X4p -X8p 
p .
[p .
\p .
{p .)8p .8rp 
.<p .J6p .lYp .xtp 
S@P 4qP 4yP 4<P 4+|P 4;yP 4=P 4=9P 4I1P 4I3P 4[XP 4^P 4h4P 4kP 5P 5IzP 5KsP 5LP 5X4P 5X8P 5Z7P 5h6P 68P 6zP 6	yP 6VP 6
P 6
[P 6
\P 6
{P 6)8P 68rP 6<P 6J6P 6lYP 6xtP vL\ XQ%i


	.XCREXpF	e
	.ASSIGN	eY,ENTNUM,1

A::Y0	EXP	D
	XLIST
YP	EXP	<e&7777>+1
	IFIW	[ASCIZ \CZ\]
	IFIW	AGET
Z1	IFIW	ACMP
	IFIYqW	ACHG
	IFIW	AZQRES
	IFIW	APRT
	IFIW	AHLP
	IF\pIW	APRS
	EXP	B]
	IFIW	ADFL
	LIST
P SMXy#@ U	%<

	PUSHJ	PV),[PUSHJ P,A$ERRM#VH#
		   XWD	A,'VhB'
		   XWD	E,[WITEXT (<C>)]
	IW(FB  <D>,< EXP 0>WH
	IFNB <D>,< EXP D>
		  ]
B~
@A` B~
@J.I@A` J.I@J.MA` J.M>}{woP