Google
 

Trailing-Edge - PDP-10 Archives - BB-FI82B-DD_1989 - 5,17/qsrmv2.unv
There are 7 other files named qsrmv2.unv in the archive. Click here to see a list.
x
,$@P C
yhrp C
yj2p C
yj:p C
yl}p C
}|P C
~\yP CjvP C&:=P 
C@P GqhVp Gql}p G")l}p G0t(:P$G0t,2P'G0u+qQ xG2iiQp G2ijQp G2n:=p G7
P G7
 P G?)l}p GLtIYP GLtiP'GLtiQ xGLtkP GLu+qQ xGLuKqP'~GNiip GNii7p GNiiRp GNiiXp GNiiYp GNijQp GNiktp GNilzp GNim9p GNn:=p IY{Ph5
*|ItkQQ xIu+qP'IjQp Il7p Il}p IXtK2P'IXtyQ xIXuKP IXuM8P IXum6P IXv=P |IXv]P JP KDt9P'KDt;yQ xKDtI8P'KDtLwP'pKDtlVQ KDuKtP'KDuLQ xKDuhVQ xKDulYQ @KDum6P'KDu}:Q `KDv	yP'KDvP'KDv
TP KDv
WQ xKDv
[P9KDvKDv)P KDv98Q xKDv<P @KDvJ6P'KDv[TQ 0KDv[WP KDvlYQ xKF<}P KFF:=p KFN:=p 
	XLIST
YP
	X	BMG,<Bad MODYpIFY Group>
	X	CBZL,<Can not Build Z0Queue Listing, waZPit then try againZp>
	X	CLQ,<Specif[ied queue cannot [0be listed>
	X	IC[PM,<Illegal CREATE[p Message>
	X	IFD\,<Illegally Forma\0tted Device Name>\P
	X	IMT,<Illegal\p Message Type>
	]X	INF,<Illegal Nu]0mber of Files>
	]PX	IPE,<Insufficie]pnt Privileges Ena^bled>
	X	MTL,<Me^0ssage Too Long>
^P	X	MTS,<Message i^ps Too Short>
	X	_NKC,<Not a Known _0Component>
	X	NO_PR,<Number Out of _pRange>
	X	SNY,<S`pecified request `0is Not Yours>
	X`P	UQS,<Unknown Que`pue Specified>
	Xa	WVN,<Wrong Versia0on Number>

	LIST
	SALL

	LIMn:=p MF:=p M@tI6P$M@th|P M@tiSQ ~M@tiYP'M@tjQ xM@tkP"M@tlQ |M@tlxQ xM@uwP  M@uiTP!M@v<P @M@wP MBn:=p MCF:=p MJm<|P 
MJmkyQ ]?X6MJmm6P MJn:hQ pMJn:iP MJnJP 2MJn[TP MO*yP @MO,P MO,P MOiP MOj1P MO[YP MO\YP MOj1P MO
ZP=QMO[P MO|P MRV>9P MS2Q MSQ MS.[yQ N:
hzP2N:%iYPN:%kyQ]?X6N:%m1P^N:49PN:5LQ N:6P N:6
N;*0P N;
TP PP Qaj(p Qaj)pvQaj)pQakVp Qalp Qalrp Qalzp Qal}p Qd.2Q QdK2P'QdLwQ ~Qdl]Q @QeKQ Qf2Q xQf)Q Qf8tQ Qf=Q  Qfi9P'S;9P 2S;;yP S;m6P S;	yP dS;P S;
}P SBY9p SB
[p SB(yp SB,BP SB,bP SB,}P SB."P SB9p SB:2p SB:=p SB)iP SB)iP SB)lXP SB)lsP SB)lxP SBih2P'SBihzQ xSCj2Q  SCj3Q SCmQ @W&al7p W&alXp W&al}p W&f2Q xYt(:P YtIYP @Yu+qQ xYuKqP'~Yyjp YyjQp Yyl}p Y'l7p Y'l}p Y'2Q xYC$hzQ YLv
TP YLv
WP'YLv98Q xYO!h3p YO!ip YO!iZp YO!jQp YO!kp YO!kZP YO!ktp YO!lp YO!lp YO!lxp YO!lzp YO!l}p YO!m9p ZP [3@ >q<<<1_<A>>-1>B<B>>_<A>>[@ t(.
	IFB <BtH>,<MAXSIZ==0
		IthRP A,<IFG <A-MAuXSIZ>,<MAXSIZ==Au(>>>
	IFNB <B>,<uHB==0
		IRP A,<uhIFG <A-B>,<B==A>>>
B>,<B==[F:=P 
[>!iRp [>!iSp [>!iTp [>!irp [>!iwp [>!l7p [>!lXp [>!l}p [>$iP'[>${P'[>$|Q x[>&2Q x[F5k( X(5BSIXBIT\QSRMS1\SIXBIT\QSR[F5k) XH5DSIXBIT\QSRMS2\SIXBIT\QSR[LtuQ @[Lt;ZQ ?x[LvN8P'[NF:=p ] E8+
	IFNDEF	A,<A==B>
F	]'$[9@ 
a  6H3J
	IFDEF 6hA,<
		IFL <A-C7@>,<PRINTX VALUE O8F A IS TOO SMALL8(>
		IFG <A-D>,8H<PRINTX VALUE OF 8hA IS TOO LARGE>
	>  ;END IFDEF 9(A
	IFNDEF A,<A==B>
F A,<Aa3$hzP aJ}Ks P`5>	;MACRO TOP@ GENERATE MODULE P PROLOGUE
	SALL
P	XLIST
	SEARCH	SQhBSMAC		;GET SUB-SRYSTEMS MACROS
	SR(EARCH	MACTEN		;GERHT UNIVERSAL SYMBORhLS AND MACROS
	ISNTERN	%%.QSR,%%.SS(BS	;FOR LINK CONSSHISTENCY CHECKS
	ShSEARCH	UUOSYM		;GTET TOPS10-UUO SYMT(BOLS
	IFIDN	<A>TH<QUASAR>,<	;IF MAThIN MODULE
		.REQUUIRE QSRMEM,QSRQUU(E,QSRSCH,QSRIPC,QUHSRFSS,QSRADM,QSRTUh10,SBSCOM
	>  ;EVND OF IFIDN
	IFIV(DN	<A><QSRT20>,<VH	;IF OTHER INTERFVhACE
		PASS2		;SAWVE THE ASSEMBLY
W(		END		;AND THE PWHAPER
	>  ;END OFWh IFIDN
	LIST
	SALL

	LIST
	SaN)wp aNHp aNIp aNIp aNh6p aN	p aN
2p aN(up aN8tp aN9p aN:=p aN=p aOLK2P'aOLl]Q  aOM	P'aOMKQ aOMZQQ xaOMjXQ xaOMnP'aON	yQ xaON2Q xaON)Q aON8tQ @aON:QQ xaON:ZQ xaON;1Q xaON;:P'aONHQP'aONHZP'aPtQ aPt;ZP'aPuKUQ `aPv\rQ aPv|UQ aShzP ct;yQ xctI8P'ctK2P'ctLQ xcv	yP'cv
TP cv
WQ'xcv)P cv,8P'xcv98Qvxcv<P @cvJ6P'cv[TQ 0cv[WP cF:=p c tkP'~c uP$c uLzP"c uh6Q xc umP c v
cOYP cOZ7P cOi9P cOzP cV-	 h6c  ;MACRO Th0O GENERATE THE QUhPEUE HEADERS FROM hpTHE QUEUES MACRO
	DEFINE	X(A,B,C,i0D,E),<	;DEFINE X iPFOR THE LATER EXPipANSION OF QUEUES
HDR'A::	INSVL.(<j0SIXBIT\   A\>,QH.jPNAM)!INSVL.(C,QH.jpTYP)!D
	EXP	0
	kIFDIF	<E> <0> ,<Gk0LOB(E)>
	XWD	E,IkPNSVL.(B,QH.SIZ)
kp	>  ;END OF DEFINlE X
	QUEUES			;Nl0OW EXPAND QUEUES
EXPANDQUEUES

	XLISTb

	X	INP,QNTSIZb0,.QHTIP,QH.LST,S$bPINPT
	X	LPT,QNTSbpIZ,.QHTOU,QH.LST,cS$LPT
	X	PTP,QNTc0SIZ,.QHTOU,QH.LSTcP,S$PTP
	X	CDP,QNcpTSIZ,.QHTOU,QH.LSdT,S$CDP
	X	PLT,Qd0NTSIZ,.QHTOU,QH.LdPST,S$PLT
	X	IPC,dpIPCSIZ,.QHTQS,QH.eIPC,0
	X	IPS,IPCe0SIZ,.QHTQS,QH.IPCeP,0
	X	SPL,SPLSIZep,.QHTQS,0,0
	X	PfSB,PSBSIZ,.QHTQS,f00,0
	X	USE,USESIfPZ,.QHTQS,0,0
	X	fpAFT,AFTSIZ,.QHTQSg,0,S$AFTR
	X	RDEg0,RDESIZ,.QHTQS,0,gPS$RDE

	LIST
	SALL

LIST
	eYl}p e:=p e.:=P 
eahUp eahVp eaiRp eaj:p eal}p e	h3p e	j7p e	j:p e	l}p e0tKQ @e0u+qP'e0v
VQ  e<ui;P'e<u|SQ xe?)lzp e?)l}p gDI3P gEKUP gE[rP gF8tP g@t(:P g@tIYP @g@u2P  g@u+qQ xg@uKqP'~g@uYP g@vyP g@v2Q xgBaip gBai7p gBaiWp gBaiYp gBajp gBajQp gBalzp gBal}p gBam9p gBe+qp gBeJ6P gBeXQP gBez2p gBf
TP gBf2p gBf,=p gBf:=p gBf=p gCLLP'gCM+qQ xgCMI7P'gg
V {(`
	IFNB <{HB>,<IFN FTUUOS,<{hA==B>>
	IFNB <|C>,<IFN FTJSYS,<A==C>>
SYS,<iAk9p iAlzp i`t^Q i`th:Q @i`u[yQ i`uk9Q i`u|Q i`v=3P'i`v|WQ  kN.:=P 
p :H3N
	XLIST
:(	INTERN	$$A
	$$:A==$$
	$$==$$+19h
	LIST
	SALL

	LIST
	SALL
q@ ml
	INTERN	m A
	IFB  <C>,<m@A==B>
	IFNB <C>,<A=B>
 <CP 
&<P NrP NsP NtP NzP N<P lWP l87P 
l:P lI3P 
m:6P 
mLzPm[rP	mnPn)6Pn)8P	txqPuH8P u}`P v	qP 
	IFNDEF ?@$$A,<
		PRINTX ?`UNDEFINED COUNTER@ A USED
	>
	AO@ S	G$ITEM##+$$A
G$ITEM##+$$A
	'$[  B 4|
	XLIST
B@	X	(NOW,CURRENT TB`IME OF DAY)
	X	(CSTAR,QUASAR STARTC  TIME)
	X	(QJOB,C@QUASARS JOB NUMBEC`R)
	X	(IPCI,TOTADL NUMBER OF IPCF D INTERRUPTS RECEIVD@ED)
	X	(IPCD,DEFD`ERRED IPCF INTERREUPTS)
	X	(RIPC,IE PCF MESSAGES RECEE@IVED)
	X	(SIPC,IE`PCF MESSAGES SENTF)
	X	(IPCF,IPCF F SEND FAILURES)
	F@X	(IPCU,UNRECOVERF`ABLE IPCF SEND FAGILURES)
	X	(MRELG ,RELEASE MESSAGESG@ RECEIVED)
	X	(MG`CHK,CHECKPOINT MEHSSAGES RECEIVED)
	X	(MREQ,REQUEUEH@ MESSAGES RECEIVEH`D)
	X	(MNXT,NEXTIJOB MESSAGES SENTI )
	X	(MABO,ABORTI@ MESSAGES SENT)
I`	X	(NPGC,PAGES GAJRBAGE COLLECTED)
	X	(NGCC,GARBAGEJ@ COLLECTOR CALLS)J`
	X	(MLST,LIST MKESSAGES RECEIVED)K 
	X	(NLAP,LISTANK@SWER PAGES SENT)
	X	(SCRE,SUCCESSLFUL CREATES DONE)L 
	X	(MMOD,MODIFYL@ MESSAGES RECEIVEL`D)
	X	(MKIL,KILLM MESSAGES RECEIVEM D)
	X	(MDEF,DEFEM@R MESSAGES RECEIVM`ED)
	X	(ISPL,IMMNEDIATE SPOOL MESSN AGES RECEIVED)
	N@X	(DSPL,DEFFERED N`SPOOL MESSAGES REOCEIVED)
	X	(MCANO ,COUNTANSWER MESSO@AGES SENT)
	LIST
	SALL

	LIST	NNI6 @`4
	IFNDEF A$$B,<
		PRINTX A UNDEFINED COUNTERA@ B USED
	>
	STA`ORE	A,G$ITEM##+$$B
G$ITEM##+$
vyP89P 8QP 8TP :6P H9P H9P KqP LzP 9P TP 
6P H9P HTP J1P J6P )7P S@P 5:6P 6)6P 
zp 	
Zp 
:p 
I2p :p 
}p^)ph98p<p \yp 
p &=p d(P h9P hwP iWP lHp lIp lzp Sp :=p lvP X5P 2P '<P '<P *|A  *|6|H1P 6|K4P 6|LP 7N8p F,<Rp F,I2p F,I;p F-p F-p F-+qp F-K(p F-K)p F-K)p F-K*p F-K*p F-KUp F-z2p F.
2p F.
Zp F.98p F.=p F.=p F.\yp 	FEKUp FF3p FFJ8P FFK2P FFKzP FFL9P FFN8p FLkQP$F|WP F|87P F|:P F|;zP F|<RP F|IYP F}	6P F}:6P F}H7P F}J9P F}[rP F}i<P F~(uP F~)6P F~)8P F~+zP F~I<P J$)9p J$*Qp J$*Vp J$+tp J$+vp >}{woP