Google
 
Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_1_19910112 - 5-galaxy/batmac.unv
There are no other files named batmac.unv in the archive.
x
,5>@P C2:=P 

D:$YYP$D;HwP"Et:Q Eu+qQ @Eu|XQ  Ev\XQ E6I;P E6YP E6X7P E6Z7P E6i9P E6zP F({A  F({F
2A  F
2FMmA  FMmF^
2A  F^
2FlA  FlFA  FFX{A  FX{F[A  F[F

VA  F

VF[RA  F[RF
2A  F
2Gx(GLOBPA>GPG#h(PG#mZPFI5ZQPJ:|PJ:\yP J:UKsP J:UKsP J:dj7P J:dkrP J:u+qP J:u|P J:u|VP J:v
xA  L
xL$[A  L$[L&)6A  L&)6L4:A  L4:L4@A  L4@LL-3A  LL-3LL.:A  LL.:LMiWA  LMiWLM|A  LM|L|-3A  L|-3L|.:A  L|.:L}|A  L}|L|`A  L|`L[A  L[L[@A  L[@L]`A  L]`L)6A  L)6MF:=P M&d[5P'M0p^P M0tqP M0t<YP @M0t\YP  M0uTP M0uH1P  M0ui9P"M0ukxP M0v	9P$M0vP!M0v:6P M0v<P M0v=8P @M0vKP M0v\P M0wqP M>l}p MHp\sP"MHt(5P!MHt:P MHt=P MHtj7P  MHuTP MHu+P MHuIRP  MHuIWP @MHuLvP @MHuhVP MHv,qP$MHv8qP MHv;P MHv=P MHvHVP MHvZP MRV>9Q MS.[yP MVeHzP NP O2|  WP%GIRP A,<
Wp	IF2,<IFDEF A,<.XIFN A,EXTERN,<INX0TERN A>>
	     XPIFNDEF A,<EXTERNXp A>
	     SUPPRES A>>   SUPPRR/
:A  R/
:RE|zA@RE|zRMj:ARMj:RMmARMmRMm	ARMm	RMm	ARMm	RMySA5RMySRM{@A~RM{@RUSARUSRu}`ARu}`RLARLR|AR|R%9A&R%9R>K`A  R>K`S-m S;!h6PS;!j7PS;!kzPS;!lP@S;!l	P S;!lP S=P S=P SBh9p SBhrp SBip SBlZp SBmp TP U&:=p U0vYP  U0vZPP$U0vZQP U0v[P"U0v[6P!U0v[pP @UVn	@ 4@UVn

	  LSTf`OF. XCREF

	CDOg	OTSINI			
	CDO	g     			
	CDO	.ZPg@AGA
	CDO	.ZPAGN
	CDO	.ZCHNK
	CDhO	.SAVE1
	CDO	.Sh AVE2
	CDO	.SAVE3h@
	CDO	.SAVE4
	Ch`DO	.SAVET
	CDO	.iSV13
	CDO	.SV14
	CDO	.SV15
	CDOi@	.SV16
	CDO	.RETi`T
	CDO	.RETF
	CjDO	.RETE
	CDO	.Aj OS		
	CDO	.SOS		j@
	CDO	.ZERO		
	j`CDO	.POPJ		
	CDOk	.STOP		
	CDO	.Sk AVE8		
	CDO	.STKk@ST		
	CDO	.TRSETk`		
	CDO	.POPJ1		l
	CDO	.UD2SC		
l 	CDO	.SC2UD		
	Cl@DO	.CPUTY		
	CDOl`
	CDO
	CDO

	mCDO			
	CDO	C%RPm RM
	CDO	C%INTR
m@	CDO	C%SEND
	CDOm`	C%RECV
	CDO	C%BnRCV
	CDO	C%REL
n 	CDO	C%CPID
	CDOn@	C%KPID
	CDO	C%Sn`PID
	CDO	C%MAXP
	CDO	C%PIDJ
	CDo O
	CDO
	CDO
	Co@DO
	CDO

	CDO	o`      			
	CDO	Fp%IOPN
	CDO	F%AOPp N
	CDO	F%OOPN
	p@CDO	F%IBYT
	CDO	p`F%OBYT
	CDO	F%IBqUF
	CDO	F%OBUF
q 	CDO	F%REL
	CDO	q@F%DREL
	CDO	F%RRq`EL
	CDO	F%REW
	rCDO	F%POS
	CDO	Fr %CHKP
	CDO	F%INFr@O
	CDO	F%FD
	CDr`O	F%REN
	CDO	F%DsEL
	CDO	F%FCHN
s 	CDO
	CDO
	CDO
	CDO
	CDO
	CDOs`
	CDO
	CDO
	CDtO

	CDO	      	t 		
	CDO	M%ACQP
t@	CDO	M%RELP
	CDOt`	M%IPSN
	CDO	M%NuXPG
	CDO	M%IPRC
	CDO	M%IPRM
	CDu@O	M%AQNP
	CDO	M%u`RLNP
	CDO	M%CLNCv
	CDO	M%FPGS
	Cv DO	M%GMEM
	CDO	Mv@%RMEM
	CDO
	CDOv`
	CDO
	CDO
	CDwO
	CDO
	CDO	M%Gw PAG
	CDO	M%RPAG
	CDO
	CDO
	CDOw`
	CDO
	CDO
	CDxO
	CDO
	CDO

x 	CDO	      			
	x@CDO	T%TEXT
	CDO	x`T%TTY
	CDO
	CDOy
	CDO
	CDO
	CDy O
	CDO
	CDO
	Cy@DO
	CDO
	CDO
y`
	CDO	      			
z	CDO	L%CLST
	CDOz 	L%DLST
	CDO	L%Cz@ENT
	CDO	L%CBFR
	CDO	L%DENT
	CD{O	L%NEXT
	CDO	L%{ FIRS
	CDO	L%LAST{@
	CDO	L%PREV
	C{`DO	L%PREM
	CDO	L|%CURR
	CDO	L%REN| T
	CDO	L%SIZE
	|@CDO	L%APOS
	CDO
	CDO
	CDO
	CDO}
	CDO
	CDO
	CD} O
	CDO

	CDO		}@	
	CDO	I%NOW
	C}`DO	I%EXIT
	CDO	I~%ION
	CDO	I%IOFF~ 
	CDO	I%SLP
	CD~@O	I%INT1
	CDO	I%~`INT2
	CDO	I%INT3
	CDO	I%TIMR
	C DO
	CDO
	CDO	I%@SOPR
	CDO	I%WTO
	CDO
	CDO	I%HOST
	CDO	I%JINF
	 CDO
	CDO

	CDO@			
	CDO
	CDO	S`%DATI
	CDO	S%SIXB
	CDO	S%CMND
	 CDO	S%TBLK
	CDO	@S%SCMP
	CDO	S%ER`R
	CDO	S%INTR
	CDO	S%EXIT
	CDO	 S%TBAD
	CDO	S%TB@DL
	CDO	S%NUMI
`

	CDO	K%RCOC			
	CDO	K%WCOC
	 CDO	K%SUET
	CDO	@K%STYP
	CDO	K%TX`TI
	CDO	K%SOUT
	CDO	K%BOUT
	CDO 	K%BIN
	CDO	K%BA@CK
	CDO	K%TPOS
`	CDO	K%BUFF
	CDO	K%FLSH
	CDO	K%O PEN
	CDO
	CDO
@	CDO
	CDO
	CDO
	CDO
	CDO
	CDO
	CDO
	  LSTON.
  
	  LSTON.YO%GP YO%yG `(H
	IFNDEF LSTIN.,LSTIN.==0	 	
IFE LSTIN.,<
@	IFIDN <XCREF><A`>,<.XCREF>	
		  	 XLIST>		
	LSTIN.==LSTIN.+1STINYO%yS o)'			;MACRO piTO TURN OFF THE LpIISTING
	IFE	LSTIp)NG,<
		.XCREF
	oI	XLIST>
	LSTING=qi=LSTING+1	;COUNT XLIST DEPTH
	 YO%{@ r)'"			;MACRO rITO TURN THE LISTIrhNG BACK ON
	LSTIsNG==LSTING-1	;DECs(REMENT XLIST LEVEsHL
	IFE	LSTING,<	sh;DON'T TURN IT ONt IF STILL NESTED
		.CREF
		LIST
		SALL>
	IST 	@(R
	IFG LST	`IN.,LSTIN.==LSTIN
.-1	
	IFLE LSTIN
 .,<.CREF		
		      LIST>
		   Z

<8A  Z

<8ZXA  ZXZKQA  ZKQZ6	yA  Z6	yZ=Y6A  Z=Y6Z>3A  Z>3ZN

QA  ZN

QZN

VA  ZN

VZN

wA  ZN

wZw

A  Zw

Z[A  Z[ZKXA  ZKXZY6A  ZY6Z3A  Z3[>t:P  [N<+ ti'~
	XLIST
u		X	(E.NORM,NORMALu(LY)
	X	(E.RUSR,RuHequeued by User)
	X	(E.ROPR,Requevued by Operator)
	X	(E.TLMT,Time vHLimit Exceeded)
vh	X	(E.CUSR,<Cancewled by User ^P/.Jw(ARG1(R)/>)
	X	(EwH.COPR,Aborted by whOperator)
	X	(E.xJLOG,Logged Out..x(COMMAND IGNORED)
	X	(E.UERR,Termixhnated by User Erryor)
	X	(E.LFOE,Ty(erminated from LoyHg File Open Erroryh)
	X	(E.LFIO,<Tezrminated from Logz( File I/O Error>)zH
	X	(E.NSTR,<No zhFree Batch Stream{s .. Job Requeued{(>)
	X	(E.NPTY,<N{Ho Free PTY's on t{hhe SYSTEM .. Job |Requeued>)
	X	(E|(.STRA,<Stream Alr|Heady Started>)
	|hX	(E.NJOB,<No Job} Slots Available }(.. Job Requeued>)}H
	X	(E.JLOF,<Ter}hminated from LOGI~N Failure>)
	X	(~(E.SHTD,<Shutdown>~H)
	X	(E.STAR,<St~harted>)
	X	(E.NOPA,<Canceled  No (Operator IntervenHtion Allowed>)
h
	LIST
	SALL
		LIST
	SALL
	[N>L}P 	_C

zQ B-_STA  _ST`P a\` mi&r



	XmI	PTYBFR,1	


m)
	X	REQTIM,5	
	Xn		TPSIZE,100	
	X	n(.JPSIZ,100	
	X	%EXTRA,^D10	
	%a+= 5aJ}Ks 7x,O

	SALL	8			
	LSTOF. XCRE88F			

	%%.GLX==8X%%.GLX			


	I8xFNB <A>,<%%.MOD=9=SIXBIT/A/> 
	I98FNB <B>,<%%.OTS=9X=SIXBIT/B/> 

9x	GLOB	I%INIT			
:
	TOPS10	<			
	:8	SEARCH	UUOSYM		
		%%UUOS==%%UUOS:x		
	>				

	TO;PS20	<			
		SEAR;8CH	MONSYM		
;		%;X%MONS==%%MONS		
;x	>				

	IFB <<B>,<			
		.TEXT	<8|,REL:GLXLIB/SEAR<XCH/REQUIRE:I%INIT<x|
		DEFINE	$DATA= (NAM,SIZ<1>),< 
			NAM:	BLOCK	SI=XZ
		>			
		DEFI=xNE	CDO (X),<GLOB >X> 
		LIBVEC			
	>				

	IFNB >X<B>,<IFDIF <B><>xINI>,< 
		IFN GL?XPURE,<.PSECT .HI?8GH.> 
		IFE GLXP?XURE,<		
			TWOSE?xG	400000	
			REL@OC	0	
			RELOC	4@800000	
		>			
@X
		DEFINE $DATA(N@xAM,SIZ<1>),< 
		A	IFN GLXPURE,<.PSA8ECT DATA> 
			IFAXE GLXPURE,<RELOC>Ax 
			IFNDEF B%DB,<B%D::! B%DL==B8:0>
			NAM:	BLOCBXK	SIZ
			B%DL==Bx:B%DL+SIZ 
			ICFN GLXPURE,<.ENDPC8S DATA> 
			IFE CXGLXPURE,<RELOC> 
		>			

		IFDIDF <B><OTS>,<	
	D8		DEFINE	CDO (X),DX<GLOB X> 
			LIBDxVEC		
		>			

E	>>				

	IFNB E8<B>,<IFIDN <B><EXINI>,< 
		DEFINEEx	$DATA (NAM,SIZ<1F>),< 
			NAM:	BLF8OCK	SIZ
		>			
FX	>>				

	LSTONFx.				

	GLOB	<.GPOPJ, .RETT, .RETG8F>	
	OPDEF	$RET	GX[POPJ	P,]	
	OPDEGxF	$RETT	[PJRST	.RHETT]	
	OPDEF	$REH8TF	[PJRST	.RETF]	HX
	OPDEF	$RETIT	[HxJUMPT	.POPJ]	
	OIPDEF	$RETIF	[JUMPI8F	.POPJ]	
	.NODDIXT	$RET,$RETT,$RETIxF,$RETIT,$RETIF
$RETIT,$RETIF
aSL)YP aSL+P 	aSMhtP dP eJ6P e"luP'e0tzP$e0t:xP e0tJ0P  e0thtP e0tkP e0uwP e0uTP$e0u*2P  e0u+PP!e0u:QP e0uItP e0uY9P"e0uZ8P e0u\xP e0ukP e0u|P @e0vP @e0v=P fP f[RA  f[Rf$A  f$f.,@A  f.,@f/
:A  f/
:fMmA  fMmfv[4A  fv[4f;8A  f;8fA  ff$(2A  f$(2f$)A  f$)f$+A  f$+g'EKs `gPt;P$gPt;;Q  gPuXP  gPu)P!gPv-7Q @gPv=xQ @gg

V W8-A
	IFNB <WXB>,<TOPS10<A==BWx>>
	IFNB <C>,<TXOPS20<A==C>>
PS20<A==C>>
h$^A  h$^h&N A  h&N i?4( X`-FIFN FTUUOS,v=3P[v|Wi?4H Y -JIFN FTJSYS,?7m8[Lt;ZiCRP  ic%+q @ic%Ks  m:7 vX/;
	IFG  <vxAMAN-ADEV>,<AEDwT==:AMAN>
	IFLEw8 <AMAN-ADEV>,<AEDT==:ADEV>
p nI(
	XLIST
)	A==$$			;ASSIGN	 VALUE TO SYMBOL
	$$==$$+1		;INCRIEMENT COUNTER
	LIST
	SALL
	CRP 		H  )(
p 
			A:	BLOCK	B
		A,E('(

1NITer	J.@ ,~	J.I@P`5(@J.I@	J.J3P`4@(EB~
@	J.J:P`5@(EB~
@	J.MP`5(?J.M
t{P 
u[rQ E%X1FLPP ~0A  ~0S@P ]A  ]&

SP &=P &|wP 
*)hp 0*)ip 1*xp 
*kqp *

XP 
*)Wp *\tp *.(rp *.,Wp *5H3p !*L;Zp $*MiWp 
*Mlp "*NDHP 
*UxWp**UxYp*%*dVp**d;Zp**dkqp**e)Wp**eytp*0*f3p+*fzp+*f +Xp +Lwp $+Lzp [+}:p +:2p !+:=P  +Mp %+N7p {+

zp +

.:p S+

9Rp +

9Xp +

;wp+:9p+=pT+N8pS+YypU+[vp  +\4p +J6p  +[Zp +Rp 1+
@A  B~
@B~
HA  B~
HJ.I A  J.I J.I@A  J.I@J.MA  J.MNi(A  Ni(Ni)A  Ni)Ni)A  Ni)Ni*A  Ni*Ni,A  Ni,Ni:A  Ni:N-2A  N-2N~0A  N~0O%<zA  O%<zO%|A  O%|O2`A  O2`O2A  O2O2 A  O2 O2@A  O2@S9:A  S9:V",qA  V",qjUA  jUj.+`A  j.+`kpA  kpkwA  kw>}{woP