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@!' "g@.Cng@6+Jg@6.kg@<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