Google
 
Trailing-Edge - PDP-10 Archives - BB-H348C-RM_1982 - swskit-v21/debugging-tools/dts/dtsunv.unv
There are no other files named dtsunv.unv in the archive.
x
,F}@P CKUA CKUC^}97A  C^}97G2yA  G2yG2zA  G2zG2$yA  G2$yG2$zA  G2$zG2MXyA  G2MXyG2MXzA  G2MXzG3UKUA  G3UKUG>YP G>ZP 

IZP IMmP ID\YA  ID\YI6= +x"m
	A==<-1,B<C>+1B<C-D>> ,8
	IF1,<IFDEF %A,X,<PRINTX ?A ALRE,xADY DEFINED>>
	D-EFINE %A (OP,AC,-8Y,MSK)<
	$A==<Z-X B>		
	OP (<AC>,B'Y,MSK)><AC>IS;wA  IS;wISH:A  ISH:ISJ9A  ISJ9ISZA  ISZIS)WA  IS)WIS

ZA  IS

ZKKEKUA  KKEKUL@ S"J`A  S"J`S"{WA  S"{WS"$A  S"$S"M\sA  S"M\sS#%2A  S#%2S6YP 

S6ZP S6MlvP S6MmP UN{Z Za^		
	 ERCA[L [EXCH T1,(P)	
[ 		CALL PRERRJ	
	[@	SKIP 0,[ASCIZ\A[`\]	
		POP P,T1	
		JRST .+1]1	UN.,VUN=} ^!nx 
				
	^Q ERCAL [EXCH T1,(^pP)	
		CALL PRERR_J	
		SKIP 0,[ASC_0IZ\A\]	
		POP P_P,T1	
		JRST b]	_p
;	IF2 <PURGE b>	IF2 <PURGE bxn.+1$,UNEM \!l		
	 ERCA\AL [EXCH T1,(P)	
\`		CALL PRERRJ	
	]	SKIP 0,[ASCIZ\A] \]	
		POP P,T1	
		HALTF		
		JRST .+1]		
		JRSUO] Y!R		
	 ERCAYAL [EXCH T1,(P)	
Y`		CALL PRERRJ	
	Z	SKIP 0,[ASCIZ\AZ \]	
		POP P,T1	
		RET]PP,T1	gp
	g==.		q	
	LOC			
	f==.			
	BLOCK D		0
				
	.ORG g	P	
	LCBSIZ==LCBSIpZ+D	
	DEFINE %STR (A),<
		DEFIN0E XXXSTR (TYP,PS)P,<TYP'STR (LCBA,p<A'(LCBPTR)>,PS)>>
	%STR (\f)		
	IFB <E>,<
		XPXXSTR (DEF,<B,Cp>)>
	IFNB <E>,<
		IFIDN <E><DE0F>,<
			XXXSTR (PDEF,<B,C>)>
		pIFIDN <E><MSK>,<
			XXXSTR (MSK,0B)>
		IFDIF <EP><DEF>,<
			IFDIpF <E><MSK>,<
				IF1 <PRINTX ?LC0B MACRO E INVALIPD>>>>
	IF2 <PURGpE f,f>		
	IF2 <PURGE g,g>2 A53573691;DEFYX1Q  YXYQ xY\UQ @Y\VQ Y\vQ YZQ  YzQ Y,}Q xY:Q Y:2Q Y;wQ Y<}Q xYI9Q xYJ2Q YLzP'Y\YQ YkQ Y|Q Y

zQ YQ Y2Q YQQ YqQ Y)WQ YI9P'YKQ YLzA  YLzY\}P'Yk9Q YyQ Y|Q Y|xQ Y9Q Y
6Q'YY({Q Y*SQ @Y+Q Y+1Q Y+qP'Y,wP'Y8QQ Y9yQ Y:=P Y;Q Y;1Q Y;RQ Y;qQ xY<QQ xY=Q Y>TQ YJ2Q YLuQ Y\rQ Yx:Q Y>

D(A  Y>

D([8@ B8,<1B<<A>-1>-1B<B>><A>-1[N^= L8,o
	A==C	LX	
	IF1,<IFDEF %LxA,<PRINTX ?A ALRMEADY DEFINED>>
	M8DEFINE %A (OP,ACMX,Y,MSK)<
	$A==<MxZ B>		
	OP (<AC>,B'Y,MSK)><AC]^e81P ]^e9P ]^e:P ]^e;rP ]^e;xP ]^e<P ]^e=P ]^e=4P _BuKUA  _BuKU`@ `D@ `H@ `L@ `P@ `T@ `X@ ad[@P da&|i@A  a&|i@a&}`A  a&}`aJ$>A  aJ$>aJ.,UA  aJ.,UaJ.,WA  aJ.,WaJMiWA  aJMiWaJv[;A  aJv[;aK$qA  aK$qaK$H| TFnh
	DEFINE TA$GOTO (ARG),<DEFIT`NE .$TRANSFER <JRUST ARG> >
	DEFINU E $CALL (ARG),<DEU@FINE .$TRANSFER <U`CALL ARG> >
	DEFVINE $RET <DEFINE V .$TRANSFER <RET> V@>
	DEFINE .$TRANV`SFER <>
	IRP D,W<D>
	JRST   [PUW SH P,T1
		PUSH PW@,A
		MOVE T1,AW`
		JSP P5,PRDCXEX
		SKIP 0,[ASCIZX \B\]
		POP P,AX@
		POP P,T1
		.X`$TRANSFER
		C]
ANSFER
		C]JRST .+1aK$\Y O!nX
	DEFINE OQ$GOTO (ARG),<DEFIOpNE .$TRANSFER <JRPST ARG> >
	DEFINP0E $CALL (ARG),<DEPPFINE .$TRANSFER <PpCALL ARG> >
	DEFQINE $RET <DEFINE Q0.$TRANSFER <RET> QP>
	DEFINE .$TRANQpSFER <>
	IRP C,R<C>
	JRST   [JSR0P P5,PRERRN
		SKRPIP 0,[ASCIZ\A\]
		.$TRANSFER
		B]
ANSFER
		vvJRST .+1aK%S Qn8
	DEFINE 
Y$GOTO (ARG),<DEFI	YNE .$TRANSFER <JR
ST ARG> >
	DEFIN	EA$CALL (ARG),<DERG> >
	DEF9INE $RET <DEFINE )).$TRANSFER <RET> >
	DEFINE .$TRAN
9SFER <>
	IRP C,I1<C>
	JRST   [JSIPP P5,PRINFN
		SKIpIP 0,[ASCIZ\A\]
		.$TRANSFER
		B]
ANSFER
		tRJRST .+1aK%xUA  aK%xUaK%|A  aK%|aK&,wA  aK&,waK&9yA  aK&9yaK&|W JqtnH
	DEFINE K!$GOTO (ARG),<DEFIK@NE .$TRANSFER <JRK`ST ARG> >
	DEFINLE $CALL (ARG),<DEL FINE .$TRANSFER <L@CALL ARG> >
	DEFL`INE $RET <DEFINE M.$TRANSFER <RET> M >
	DEFINE .$TRANM@SFER <>
	IRP C,M`<C>
	JRST   [JSNP P5,PRWARN
		SKN IP 0,[ASCIZ\A\]
		.$TRANSFER
		B]
ANSFER
		uSJRST2.+1aK<WAaK<WaNMTA  aNMTaNN=HA  aNN=HaNN=IA  aNN=IaNN=IA  aNN=IbH@ bL@ eKUA  eKUeuKUA  euKUe5KUA  e5KUe
	CALLRET A

	CALLRETe"uKUA  e"uKUe&mKUA  e&mKUe2%KUA  e2%KUe3KUA  e3KUe>%KUA  e>%KUeC=KUA  eC=KUeOKUA  eOKUeRuKUA  eRuKUeWKUA  eWKUg$;A  g$;g&mKUA  g&mKUg2,\A  g2,\g:%KUA  g:%KUg:%\sA  g:%\sg:&=A  g:&=gRyA  gRygRzA  gRzgR$yA  gR$ygR$zA  gR$zgRMXyA  gRMXygRMXzA  gRMXzhD@ hH@ hL@ hP@ iI, d1-
	a==0
dQ	DEFINE B8 (DD),<dpBYTE (8)'DD,DD+1,eDD+2,DD+3>
	REPEe0AT <^D256/4>,<B8(eP\a)
			a==a+4>)
			a==a+4i&m}:A  i&m}:iO$;vA  iO$;vqcF= iAJASTR (LCBi!DST,<46(LCBPTR)>,B)46(LCBPTR)>,	'R `1		
	IFLE `QA,<PRINTX $ISAVE`p - INVALID INTERRaUPT A>
	IFE A-a01,<JSR PSISV1>
	aPIFE A-2,<JSR PSIapSV2>
	IFE A-3,<bJSR PSISV3>
	IFGb0 A-3,<PRINTX $ISbPAVE - INVALID INTbpERRUPT A>
				RRUPT A>
					BMyS cqCALL PIOFFCALL PIOFF	BM{@ c1CALL PIONCALL PION2(1 aR
	$LCBABT==<Z 7(LCBPTR)>		 
	A (<B>,7(LCBPTR)C,D)7(LCB2(1 9M
	$LCBACT91==<Z 42(LCBPTR)>	9P	
	A (<B>,42(LCBPTR)C,D)2(L2(Y A0
	$LCBBSZa==<Z 7(LCBPTR)>		
	A(<B>,7(LCBPTR)C,D)7(LCB2(t 
	$LCBCHN	==<Z 1(LCBPTR)>		(
	A (<B>,1(LCBPTR)C,D)1(LCB2(t y
	$LCBCID==<Z 3(LCBPTR)>		8
	A (<B>,3(LCBPTR)C,D)3(LCB2(w <!f
	$LCBCON<A==<Z 45(LCBPTR)>	<`	
	A (<B>,45(LCBPTR)C,D)5(L2(y '!g
	$LCBCSZ,Y==<Z 26(LCBPTR)>	,x	
	A (<B>,26(LCBPTR)C,D)6(L2) yF
	$LCBDER(I==<Z 24(LCBPTR)>	(h	
	A (<B>,24(LCBPTR)C,D)4(L2) 


	$LCBDID!==<Z 4(LCBPTR)>		@
	A (<B>,4(LCBPTR)C,D)4(LCB2) =!
	$LCBDST?Q==<Z 46(LCBPTR)>	?p	
	A (<B>,46(LCBPTR)C,D)6(L2)9 -Ap
	$LCBERR-a==<Z 27(LCBPTR)>	.	
	A (<B>,27(LCBPTR)C,D)7(L2)V 9'
	$LCBFLGY==<Z 7(LCBPTR)>		x
	A (<B>,7(LCBPTR)C,D)7(LCB2)x 4y+
	$LCBGPU5==<Z 36(LCBPTR)>	58	
	A (<B>,36(LCBPTR)C,D)6(L2* 0Y	
	$LCBHST0y==<Z 32(LCBPTR)>	1	
	A (<B>,32(LCBPTR)C,D)2(L2*2 

!f
	$LCBID=

A=<Z 0(LCBPTR)>		

`
	A (<B>,0(LCBPTR)C,D)0(LCBP2*4 	
	$LCBIID)==<Z 5(LCBPTR)>		H
	A (<B>,5(LCBPTR)C,D)5(LCB2*9 q
	$LCBIRC ==<Z 15(LCBPTR)>	 0	
	A (<B>,15(LCBPTR)C,D)5(L2*9 iz
	$LCBISC	==<Z 14(LCBPTR)>	(	
	A (<B>,14(LCBPTR)C,D)4(L2*S q{
	$LCBJFN==<Z 2(LCBPTR)>		0
	A (<B>,2(LCBPTR)C,D)2(LCB2+ 'A@
	$LCBLER'a==<Z 24(LCBPTR)>	(	
	A (<B>,24(LCBPTR)C,D)4(L2+ =Ip
	$LCBLLA=i==<Z 46(LCBPTR)>	>	
	A (<B>,46(LCBPTR)C,D)6(L2+9 +Qa
	$LCBMSZ+q==<Z 26(LCBPTR)>	,	
	A (<B>,26(LCBPTR)C,D)6(L2+V .Ix
	$LCBNMS.i==<Z 30(LCBPTR)>	/	
	A (<B>,30(LCBPTR)C,D)0(L2+r 3q#
	$LCBODS4==<Z 35(LCBPTR)>	40	
	A (<B>,35(LCBPTR)C,D)5(L2+x :U
	$LCBOPT:9==<Z 43(LCBPTR)>	:X	
	A (<B>,43(LCBPTR)C,D)3(L2+y $%
	$LCBOSP$1==<Z 21(LCBPTR)>	$P	
	A (<B>,21(LCBPTR)C,D)1(L2, 7	<
	$LCBPAS7)==<Z 40(LCBPTR)>	7H	
	A (<B>,40(LCBPTR)C,D)0(L2, #	
	$LCBPIM#)==<Z 20(LCBPTR)>	#H	
	A (<B>,20(LCBPTR)C,D)0(L2, 8	D
	$LCBPWC8)==<Z 41(LCBPTR)>	8H	
	A (<B>,41(LCBPTR)C,D)1(L2,Q ar
	$LCBRBC==<Z 13(LCBPTR)>	 	
	A (<B>,13(LCBPTR)C,D)3(L2,Q Qa
	$LCBRCVq==<Z 11(LCBPTR)>		
	A (<B>,11(LCBPTR)C,D)1(L2,U I8
	$LCBRJFi==<Z 7(LCBPTR)>		
	A (<B>,7(LCBPTR)C,D)7(LCB2,V YI
	$LCBRLMy==<Z 7(LCBPTR)>		
	A (<B>,7(LCBPTR)C,D)7(LCB2,V "
	$LCBRMB"!==<Z 17(LCBPTR)>	"@	
	A (<B>,17(LCBPTR)C,D)7(L2,W ;]
	$LCBROC;9==<Z 44(LCBPTR)>	;X	
	A (<B>,44(LCBPTR)C,D)4(L2,Y )IP
	$LCBRSN)i==<Z 25(LCBPTR)>	*	
	A (<B>,25(LCBPTR)C,D)5(L2,q Yi
	$LCBSBCy==<Z 12(LCBPTR)>		
	A (<B>,12(LCBPTR)C,D)2(L2,s 2i
	$LCBSGS3	==<Z 34(LCBPTR)>	3(	
	A (<B>,34(LCBPTR)C,D)4(L2,v QA
	$LCBSLMq==<Z 7(LCBPTR)>		
	A (<B>,7(LCBPTR)C,D)7(LCB2,v  y
	$LCBSMB!==<Z 16(LCBPTR)>	!8	
	A(<B>,16(LCBPTR)C,D)6(L2,w 
	$LCBSNDi==<Z 10(LCBPTR)>		
	A (<B>,10(LCBPTR)C,D)0(L2,w %-
	$LCBSOC%9==<Z 22(LCBPTR)>	%X	
	A (<B>,22(LCBPTR)C,D)2(L2,y >Qy
	$LCBSRC>q==<Z 46(LCBPTR)>	?	
	A (<B>,46(LCBPTR)C,D)6(L2,z 9W
	$LCBSTS*Q==<Z 25(LCBPTR)>	*p	
	A (<B>,25(LCBPTR)C,D)5(L2,} &!6
	$LCBSZI&A==<Z 23(LCBPTR)>	&`	
	A (<B>,23(LCBPTR)C,D)3(L2- 
	$LCBTID1==<Z 6(LCBPTR)>		P
	A (<B>,6(LCBPTR)C,D)6(LCB2- 1a
	$LCBTSK2==<Z 33(LCBPTR)>	2 	
	A (<B>,33(LCBPTR)C,D)3(L2-9 64
	$LCBUSE6!==<Z 37(LCBPTR)>	6@	
	A (<B>,37(LCBPTR)C,D)7(L2-p /Q
	$LCBWAT/q==<Z 31(LCBPTR)>	0	
	A (<B>,31(LCBPTR)C,D)1(LO&  iaE
		DEFINEh9 XXXSTR (TYP,PS),y<TYP'STR (LCBDST,Y<A(LCBPTR)>,PS)>A(LCBPTR)>,PS)>S@P $(:p $,p $-3p $;Zp $^p $hwp $h{p $kxp %\sp %h5p %krp &:=P &=1p &Hqp &J6p &N8p >}{woP