Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-02 - 43,50272/meta2c.rel
There are 2 other files named meta2c.rel in the archive. Click here to see a list.
 F6OeF6Oe0#S META2:  	[--gI=[@
	(
 
,+Q\x.<,*5<*,	""D	,P,%LEN,
4<),5<",	,PUSHJ,	,	 D""P,%GEN,
,	,DEC,	,,
4<)l<5<),!	" E"$	,#PUSHJ,$	,&P,%COPYI,'
5<4<,CL#5<2,(	" ",	,,PUSHJ,-	,.P,%CLEVL+1,/
4<,*C#5<;,1	" *5	,4PUSHJ,5	,7P,%BLOCK+1,8
4<,	O5<<4<,3	"D@"=BL#5<E,:	,>PUSHJ,?	,AP,%BLEVL+1,B
4<,=	"DA
FB#5<M,D	,GPUSHJ,H	,IP,%BLOCK,J
4<,ES#	*"(N5<U,L	,OPUSHJ,P	,QP,%SYMB,R
4<,MN#5<b	*DAW,5<),T	,XPUSHJ,Y	,ZP,%CALND,[
,]	,^	"(T_DEC,_	, ,`
4<,U^(5<v,W5<W,,c,5<e	*DAh,5<g,f)5<h,,a	,kPUSHJ,l	,nP,%GET	(D"E
p,o
,p	,qDEC,r	,a,s
4<,i^5<,d5<j	(Ay,u	,yPUSHJ,z	,{P,%POP,|
,~	,DEC,	"E
	,t,
4<,v+%(5<,	,TLO,	,F,SCATEN	(Q*D*
,
4<5<x,e,,5<,5<,	"D D)5<,j,
	,PUSHJ,	,P,%PUT,
,	""E	,DEC,	,,
4<,+%5<&,	,!TLO,"	"(U"#	,#F,SCATEN,$
4<(,%5<(5<4,"
,,+	,,P,%PUSH,-
,/	,0DEC,1	,,2
	*""44<,'+#(5<<,3	,6TLO,7	,8F,SCATEN,9
4<>,5	"UU=#(5<>5<Y,)5<),,<,5<?,5<A,@)5<B,5<D	(D DE,?,,;	,GPUSHJ,H	,JP,%PUT,K
,L	"D"N	,MXWD,N	,O-1,^D,3,P
,F,R	,TASCIZ	"(QV,U	,R,W
4<,C+#5<a,X	,[TLO,\	,]	 E
T*_F,SCATEN,^
4<c,Z#5<c5<z,>5<E,E,D5<d,d	(DAg,S,`	,hPUSHJ,i	,kP,%PUSH,l
,m	,n	"(D pXWD,o	,p-1,^D,X,q
,g,s	,uASCIZ,v	"E
"x	,s,x
4<,a-5<,y	,|PUSHJ,}	,P,%CO	"A
PYL,
,	,BYTE,	,(7) 011,0,
4<,e5<	(A	,	,	PUSHJ,
	,

P,%COPYL,
,	,ASCIZ	(P(,	,y,
,~Q\x.<,{.OUT5<4,(5<f,	,	 DD"PUSHJ,	,P,%COPYL,
,	,BYTE, 	,!(7) 0	"(Q#11,0,"
,

4<$l<5<,)5<&,#	,(PUSHJ,)		(D+,*P,%COPYL,+
,-	,.BYTE,/	,0(7) 015,012,0,1
	*
E
44<,&.LABEL5<I,4(5<;,

4<8l<5<',6)5<94<=,

	*DA<5<=5<;,3	,=PUSHJ,>	,@P,%COPYL,A
,B	,C	 D"A"EASCIZ,D	,F/:/,G
4<,:.RESET5<Q,H	,KPUSHJ	""EM,L	,NP,%SETRE,O
4<,I.N$*5<Y,P	,SPUSHJ	(A
 V,T	,VP,%CPYDC,W
4<,R.N$S5<b,X	,[PUSHJ,\	"
"^	,^P,%CPYDC+1,_
4<,Z.*5<{,c5<=,a	,eHLRZ	(AD"g,f	,gT,(P),h
,i	,jADDI,k	,lT,^D,,m	"D o
,o	,pPUSH,q	,rP,T,s
,t	,uPUSHJ,v	"(Ex	,wP,%PUTNM,x
4<,b:5<,5<d,f,{[5<}	*E,d5<,]5<,z	,PUSHJ,	,P,%MAKND,
	(D"D(	,	,	XWD,
	,^D,n,t,

,,
4<	(" ,.TYPE5<,5<,	,PUSHJ,	,P,%TYPE,	""E

,	,ASCIZ,	,,
4<,^(5<3,5<	(E(Q",~,%,5<",5<$,#)5<%,
,-	,.DEC,/	,,0
4<	(U3,&^5<@,!5<',2	,6PUSHJ,7	,8P,%POP,9
	(D(Q"<,;	,<DEC,=	,1,>
4<,3+%(5<H,?	,BTLO	(A
(D,C	,DF,SCATEN,E
4<J,A%(5<J5<\,55<5,",H	"T(DM,5<K,5<M,L)5<N,',G	,QPUSHJ,R	,T	 D"(UP,%PUT,U
,V	,WDEC,X	,?,Y
4<,O+%5<c	(D E
^,[	,^TLO,_	,`F,SCATEN,a
4<e,\%5<e5<q,J	*""f5<P,b	,gPUSHJ,h	,iP,%PUSH,j
,l	,mDEC	(Q"D"o,n	,Z,o
4<,d+#(5<y,p	,sTLO,t	,uF,SCA	"*Q
wTEN,v
4<{,r#(5<{5<,f5<f,K,y,5<|,5<~	(UD,})5<,5<,|,P,x	,PUSHJ,	,	 D"(P,%PUT,
,		,
XWD,	,

-1,^D,p,
,	""E
,	,ASCIZ,	,,
4<,+#5<,		(DQ*,TLO,	,F,SCATEN,
4< ,#5< 5<7,{5<,	"QA",5<!,!,,	,%PUSHJ,&	,(P,%PUSH	(D"*,)
,*	,+XWD,,	,--1,^D,,.
,$,0	"(P(3	,2ASCIZ,3	,0,5
4<,.BEGIN5<@,6	,:	 DQ";PUSHJ,;	,<P,%BEGIN,=
4<,8.END5<H,?	,BPUSHJ	""UD,C	,DP,%END,E
4<,	O5<I4<,@.SETSCAN5<W,G	" D"L	,LPUSHJ,M	,NP,%SCAN,O
,Q	,RDEC,S		(EDU,T0,U
4<,J.ENTER5<m,V	,YPUSHJ,Z	,\ @]P,%LOOK,]
,`MV@_	"D"
`C5<f,^	,aDEC,b	,c-1,d
4<ll<5<l,e		(D"P*h,gDEC,h	,i2,j
5<#4<,W.CLEAR5<{, 5<l,k	" D"q	,pPUSHJ,q	,sP,%CLEAR,t
,u	,vDEC,w		**Dy,6,x
4<,m.SET5<,o5<p,z	,~PUSHJ,	,	 D"P,%SET,
,	,DEC,	,y,
,~Q\x.<,{	"DA

.ID5<,	,PUSHJ,

	,P,%ID,
4<p,
5<	*4<p,
.TREE5<,	,PUSHJ,	,P,%DMPTR,
	*" 4<p,.N#5<),}5<},	,PUSHJ,	,!P,%CALND,"	"

$
,#	,$DEC,%	,,&
4<p,.EMPTY5<1,(		(DP(,,+TLO,,	,-F,SUCCES,.
4<p,).STRING5<9,0	,3	 DP(5PUSHJ,4	,6P,%STR,7
4<p,1.NUMBER5<B,8	,<	 DP*=PUSHJ,=	,>P,%NUM,?
4<p,:.CHECK5<Z,5<,A	" D"F	,EPUSHJ,F	,HP,%CHECK,I
,J	,KDEC,L		*("N,',M
,BSET5<Q4<Y,PCLEAR5<Y,O	,TTLC,U		(("W,VF,SUCCES,W
5<E4<p,R.UNTIL5<h,"5<Y,X	,]PUSHJ	"""_,^	,`P,%UNTIL,a
,b	,cASCIZ,d	,N,f	"Eh
4<p,Z-.ID5<p,g	,jPUSHJ,k	,mP,%ID+1,n
	*p4<p,i-.STRING5<y,o	,sPUSHJ,t	,uP,%STR+1,v
	*y4<p,q-.NUMBER5<,x	,{PUSHJ,|	,~P,%NUM+1,
	*" 4<p,y-5<,\5<],	,PUSHJ,	,P,%TST+1,	""E(

,		,
ASCIZ,	,g,
4<p,}5<,	,	 D(UPUSHJ,	,P,,,
4<p,5<#,	,PUSHJ	(AA
,	,P,%TST,
,	,ASCIZ,	,,!
	*
#4<p,.NODE5<n,$(5<,"	,'MOVE,(	,)T,%MARK	(D"",,*
,,	,-TLO,.	,/F,SUCCES,0
,1	,2IF1	(@"4,3	,4<,,5=1>,7
,8	,9MOVE,:	,;	 D"=T+1,1(T),<
,>	,?CAIE,@	,AT+1,,6,B
,D	"E	,ETLZ,F	,GF,SUCCES,H
,I	,JJUMPGE,K		(D"N,MF,,C,N
,P	,QADD,R	,ST,1(T),T
	*EV,U	,YJUMPGE,Z	,[F,,O,\	"D"
,^	,_IF1,`	,a<,],b=,c,d+1>	(T(Q
g,f
,Wl<5<i,W)5<j,e,g:4<p,k.SCAN	"DAp5<|,m	,qPUSHJ,r	,sP,%SCAN,t
,v	,w	"
xDEC,x	,y1,z
4<p,o.LOOK5<,{	,~PUSHJ(A,	,P,%LOOK,
,`MV@	"D"
C5<,	,DEC,	,0,	
4<l<5<,
		(D"Q"

DEC,1,
5<l4<p,|.NOT5<),(5<,	"
	,TLO,	,F,NDELET,
,	5<,)5<,		(DD",TLC,	,F,SUCCES, 
,"	,#TLZ,$	,%F,BAC	  Q"'KUP+NDELET,&
4<p,.PEEK5<[,*(5<,(	,-TLO	(A
D/,.	,/F,NDELET,0
,	5<:,2	,4JUMPGE,5	,6	"*T 8F,,l,7
4<<,5<<5<-,	5<D,9	,=JUMPGE,>	"
Q"@	,@F,,8,A
4<E,5<E4<<l<5<<,B,C:	(D D(I,H	,ITLZ,J	,KF,NDELET,L
,,)5<F,M	,P	""QTLNN,Q	,RF,SUCCES,S
,T	,UTLZ,V	,WF,BACKUP	(Q*
Z,X
4<p,N(5<_,	@5<O,[)5<]4<p,^*5<p,G	(T D"b,Z:,	5<_,b	,dJUMPL,e	,gF,,a,h
	(D @
k,j	,kTLO,l	,mF,SUCCES,n
,~Q\x.<,	5<y,o	""*s	,sJUMPGE,t	,uF,,i,v
4<,5<,x		(DU|,{TLO,|	,}F,SUCCES,~
5<,	,JUMPGE	(A
Q",	,F,%ERROR,
4<	,5<	4<l<5<d,w,:	 

	,SKIPLE,	,T+1,1(T),
	(A",	,CAILE,	,T+1,777777,
,	,JRST	(D",	,.+3,
, 	,!MOVE,"	,#T+1,(T+1),$
	(D"D"&,%	,&CAIE,'	,(T+1,,",)
,+	,,TLZ,-		(
"/,.F,SUCCES,/
,`(5<	,0	,3JUMPGE,4	,5F,	(D"7,,6+1,8
,9	,:PUSH,;	,<P,T,=
,>	"@	,?MOVE,@	,AT,1(T),B
,D	,EIF1,F	,G	"D H<,7,H=1>,J
,K	,LMOVE,M	,NT+1,1(T),O	"D"Q
,P	,QCAIE,R	,ST+1,,I,T
,V	,WTLZ	(AAY,X	,YF,SUCCES,Z
,\	,]JUMPGE,^	,_F,,U	"A
b,`
,b	,cADD,d	,eT,1(T),f
,
,1	"DD"j,5<|,h	,kJUMPGE,l	,nF,,a,o
,q		(D"s,rIF1,s	,t<,p,u=,v,w+1>,y
,(D"{5<i4<jl<5<{,j)5<},x,z:,		,	POP,			(D*E	,	P,T,	
4<	l<5<	5<~4<	:,}*5<	 ,		,	
MOVE,		""	

	,	

T+1,1(T),	
,		,	TLNE,		,	T+1,777777,		"	
,		,	SOJA,		,	T,.+3,	
,		,	TLZ,		"(T		,	F,SUCCES,	
4<	:,	-5<	%,D5<	,"`x,4<	&,	"	*D"	&5<	&5<	9,		,	'MOVE,	(	,	)T+1,[DEC ,*,	*],	,
,	-	"	.	,	.CAME,	/	,	0T+1,1(T),	1
,	2	,	3TLZ,	4	,	5	 D*	7F,SUCCES,	6
4<	:l<5<	:5<	@,	8	,	;SOJ,	<	,	=T,,	>	 "D	?
,~Q\x.<,q5<	O,	!/5<	K,	?	,	DJUMPL,	E	,	F	"(Q	HF,,,	G
,q5<	#4<	Bl<5<	K,	H,	I:,~Q\x.<	(Q"T(	P,	B[5<
,	P*5<	],	R:=5<	L,5<	T,	S]5<	U,	N	,	W	 DQ"	YPUSHJ,	X	,	ZP,%PUTNM,	[
4<
,	VN$5<	n,	^:=5<	W,	*"	a5<	`,	_]5<	a,	\	,	cPOP,	d	,	eP,T,	f
,	g	,	h	""T"	jPUSH,	i	,	jSTK1,T,	k
4<
,5<
,#,	b(5<
,	**E	r5<	c,	p)5<	r,	s:=5<	t,5<	u,	t]5<	v,	m	,	xPOP,	y	"D	{	,	zP,T,	{
,	|	,	}POP,	~	,	P,T+1,

,
	""
	,
MOVEM,
	,
T,,1,	+,
-1(T+1),
	
4<
	(U


,	w:=5<
,5<	x,

]5<
,

	,
POP,
	,
P,,
	"EE

,
,

5<
5<
,~Q\x.<,
.IF5<
4,
(5<
,
55<
	(QD"
,
)5<
,
	,
POP,
	,
 P,T,
!
,
"	,
#TLO	(AA
%,
$	,
%F,SUCCES,
&
,
(	,
)JUMPN,
*	,
+T,.+2	(D"
.,
,
,
.	,
/TLZ,
0	,
1F,SUCCES,
2
,~Q\x.<,
F	*"
65<
E,
.OR.5<
D,
F5<
,
3	,
9POP,
:	,
;P,T,
<
,
=	"
?	,
>ORM,
?	,
@T,(P),
A
4<
7l<5<
9,~Q\x.<,
W	*(D"
G5<
W,
7.AND.5<
U,
W5<
E,
C	,
KPOP,
L	,
MP,T,
N
	(D D 
P,
O	,
PANDM,
Q	,
RT,(P),
S
4<
Hl<5<
J,~Q\x.<	(""
X,
H.NOT.5<
a,
W5<
V,
T	,
[SETCMM,
\	,
^(P),
_
	*U(D 
a4<,5<,5<
[,5<
c,
`	,
dPOP,
e	,
fP,T+1,
g	"D"
i
,
i	,
jPOP,
k	,
lP,T,
m
,
n	,
oPUSH,
p		(E
r,
qP,[0],
r
,
s	,
tCAM,
,
,
u	,
xT,T+1	(DD
z,
y
,
z	,
{SETCMM,
|	,
~(P),

,~Q\x.<,
X	"A"A".EQ.5<,	oxN4<,.NE.5<	,xE4<,.LT.5<

,	,QQxGE4<,	.LE.5<,xG4<,,~Q\x.<,;5<;,+5<&,;5<
d,	"D"	,POP,	,P,T,
, 	,!ADDM,"	,#T,(P)	"*D"%,$
4<9,-5<9,;5<,%	,)POP,*	,+P,T	(D""-,,
,-	,.EXCH,/	,0T,(P),1
,3	,4SUBM	(A@*6,5	,6T,(P),7
4<l<5<),~Q\x.<,y5<y,'*	*QD">5<K,y5<:,8	,@POP,A	,BP,T,C
,D	,EIMULM	""E(G,F	,GT,(P),H
4<w,=/5<^,y5<?,J	,N	"D OPOP,O	,PP,T,Q
,R	,SEXCH,T	,UT,(P),V	""(X
,W	,XIDIVM,Y	,[T,(P),\
4<w,KREM5<w	*D"`,y5<M,]	,aPOP,b	,cP,T,d
,e	,fEXCH,g	""i	,hT,(P),i
,k	,lIDIV,m	,nT,(P),o
	(Aq,p	,qMOVEM,r	,tT+1,(P),u
4<=l<5<a,~Q\x	"QA"z.<,	%5<

,v	,{PUSH,|	,}P,[DEC ,
w,~],


	*"Q*

4<

,_(5<

,5<x,

)5<

4<

,

-5<

,y5<

,

		(Q"

,

MOVNS,

	,

(P),

4<

,

*L5<

,

	,

PUSHJ	""E

,

	,

P,%XLEN,


4<

,

*5<

,

	,

PUSHJ	(A
"

,

	,

P,%GETNM,


4<

,

SL#5<

-,z5<

	,

	,

"PUSHJ	""


$,

#	,

%P,%LEVEL,

&
,

'	,

(DEC,

)	,

,

*
	* D

-4<

,

 S#5<

5,

,	,

/PUSHJ,

0	,

1P,%XSYMB,

2
4<

	(Q"

5,

-CL#5<

=,

4	,

7PUSHJ,

8	,

9P,%CLEVL,

:
4<

,

5	"DA


>BL#5<

E,

<	,

?PUSHJ,

@	,

AP,%BLEVL,

B
4<

,

=B#	*"(

F5<

M,

D	,

GPUSHJ,

H	,

IP,%XBLK,

J
4<

,

EC#5<

U	(A"

O,

L	,

OPUSHJ,

P	,

QP,%XBLK+1,

R
4<

,

MN#5<

d,

!	*""

W5<

",

T	,

XPUSHJ,

Y	,

ZP,%CALND,

[
,

]	,

^XWD	(A"T(

`,

_	,

`-1,^D,

+,

a
4<

,	n5<

,

U(5<

w,,	*"

h5<

W,

e)5<

h,

c	,

jPOP,

k	,

lP,T,

m
,

n	,

o	"
"

qPUSH,

p	,

qP,,
v,

b,

r-1(T),

u
4<

~l<5<

~,

v	"


y	,

yPUSH,

z	,

{P,,

t,

|
5<

j,~Q\x.<,

i.INTEGER	*Q*


~,5<.<,

d5<

}	(E(Q
,

}:,

W5<5<
	,,"
,
4<5<,
	(
Q\x.<,
,"Q"
,	@4<
4<Q\x.<,
5<,
,05<
,1,
,,	"A
,,,	(AQ(
,2,

g,Q
,

s4<(
l<5<	(D""
,,	(AA,	,%RESET+2,
,	,PUSHJ,	,P,,
,
,
	,JUMPGE,

	,,
,	,	"
(JRST,	,%FIN,
,l<5<	,	""@*END,	,%META2,
4</,.SUBSYNTAX5</,
#	,#TITLE,$	,	,%
,05<",,.END	*,5<*,'	,,END,-
,~Q\x.<,.	,1EXTERN,2		("4,3%ID,%NUM,%STR,%GEN,%PUSH,%POP,%ERROR,%LEN,4
l<,9	,;EXTER	"=N,<	,=%UNTIL,%TST,%COPYL,%COPYI,%TYPE,%RESET,>
,C	,D	 DEEXTERN,E	,F%BEGIN,%END,%BLOCK,%LIST,%LOOK,%SET,%CHECK,G
,L	" N	,MEXTERN,N	,P%CLEAR,%SCAN,%GETNM,%PUTNM,%XLEN,%XBLK,Q
	(AV,U	,VEXTERN,W	,Y%GET,%PUT,%LEVEL,%SYMB,%XSYMB,%BLEVL,%FIN	(D@_,Z
,_	,`EXTERN,a	,b%CLEVL,%MAKND,%SETRE,%CPYDC,%CALND,	 g%DMPTR,%MARK,c
,i	,jSTK1=,k	,l4,m
,n	"D"p	,oP=,p	,q17,r
,s	,tF=,u	,v16	(DAx,w
,x	,ySUCCES=,z	,|400000,}
,~	,	 DDNDELET=,	,200000,
,	,BACKUP=,	,	 D D	100000,	
,
	,SCATEN=,

	,040000,
,	"E*	,T=,	,1,
,,

5<4<,5<4<	*E*,"5<,	"(E(#	,"ENTRY,#	,&,%
,,5</,!5<",&	,*	 ET
+ENTRY,+	,&,,
4<'l<5<)4<B,'.EXTERNAL5<B,)5<0	(A
*4,.	,4EXTERN,5	,-,6
,1,5<@,35<3,8	("<,;EXTERN,<	,7,>
4<9l<5<;,~	"o=+qj4O}
54OV
W4O#
FM	O-*

c		@	@"c	qc
	Z4
&Kw209

u^c;	u^t#x690SKC	D" |R7	9 |RL	& |R]	% |SY	& ~D	: ~"
	O ~"

	O~&y	B`}	D" ~'	K ~'!	Ka
 ~.$
 ~.L
 ~35	] ~4l	n	D" ~@4
 ~@o
 ~@q
 ~MY
!	
4!
4fy
E!'*
E	D"!'?
7!'e
D!'g
DJ("!3j
W!3l
W!4
H!4'
U!4)
U	D"!@,!@=
a!F5!W!Y!)	!y

!!!q	D"!!!"$;!"5;!"J!'99!'J&!.9!:iy!:zy	D"!;=!;5w!;7K!FY^nJ4s7(!	Dws9&!R

	D"!T

!!]

!"/

!('

!.



!/

-!:9

5tU(!;U

=	D"!A:

E!_

M!l

U!	Q

d!,

!*

~!,

w!U

~!'u!'w

Y!	E
,/	D"!2<!!u	D"!
!
!
.j!
/!
/!
/M!
/y!qBB!qD0	D"!w'!w)/!w:/!}EB!~,9!

*@!

,@Qzuc	D"waUcb,J/4)mJmt:t<4zo$	D"JIJ=L;a81=n* N5Q OBY U'b	D" [

{J5?2 gr t
 zR3!U@J6L;"H]\"HrJ	D""HtH"NYJ"V*q"[e"[c"\5e"gl"h{"hy	D""mw{J<1<"{17"{U "{Wn))#< J<lE$J

@	D"$OqHn:$UeI$VW$\Wm$b)l$b:f$hlJBQM	D"$n*{$tr${up${w&=&=W&C<)&J1&Oi9	D"JHEU&U]B&VjZ&awY&ayQ&b4Y&h?h&op&tly	D"&uy(7-JN*b(=u(CZ#(Jn(cW(c5i(c7i	D"(od|*1j*7<*7M*=2*C=)JTrv*OW[*Pd<	D"*Pu:*V\<*W<*\E*\D*]5E*iu_,*_p,2

	D",6u
,7

y,8*,>,>5	,>7,D	,J'	@	D",J)	@,JM	:,JO	,]		,]	g?ZS(g?hkg?hZ.g@!'	"[email protected]g@6+J[email protected]g@<b?g@<b?g@?~gA}&`LwGgA^{A	@"`L}`MX	M`M[gBau+	#`vc:`M!xgEhP7`g3`

	"gF.5`/F6OeF6Oe	F6S	`M0w[gJ5w`MP`!2`MV9`#ogK9G