PDP-10 Archive: 6-1/language-sources/lnklow.unv from SRI_NIC_PERM_SRC_1

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_1_19910112 - 6-1/language-sources/lnklow.unv

There are 3 other files named lnklow.unv in the archive. Click here to see a list.

x
,5@P C

u)@`(,C%}Z`(CJ,` 1A(
	XXX	(DY1a)	;DYNAMIC DATA
2	XXX	(LC)	;LOW SE2 G CODE
	XXX	(HC)2@	;HIGH SEG CODE
2`	XXX	(AS)	;ALGOL 3SYMBOLS
	XXX	(RT3 )	;RELOCATION TAB3@LE
	XXX	(LS)	;LO3`CAL SYMBOLS
	XXX4	(FX)	;FIXUPS
	X4 XX	(TP)	;[2270] T4@YPECHECKING
	XXX4`	(BG)	;BOUND GLOB5ALS
	XXX	(GS)	;GLOBAL SYMBOLS
CJ<n`(CJ=}V`(CKR`(CLt@`([CLtl@`(jCLtlx`(yCLuP CLu)@P(,CLuH@`(VCLuKU`(tCLuh@`(oCLv

`(~CLvX@`(`CLw) `(CN5`(`COMP`(aE$;y`(gE$:`(TEt@`(]Etl@`(lEtlx`({EuP EuH@`(XEuKU`(vEuh@`(qEv

`(Ev8t`(EvX@`(bEw) `(E2{6`(jEJt`(EJtLu`(

EJuX<`(EJv(lG>n	`(jG?YV`(DG?m6`(5GCXz`(SGC-

z`(SGC.Iz`(SGK%\`(cGK%\	`(dGK%\	`(dGL`(GLuI7P GLuKVp GSN	 `(AGWN8`(rGWMYP I%2`(I

u)@`('IY@`(I,-3`(SIYy`(SI]YP wI]YP Ii9P I$`(}I$uI7P IR

k`(oIdt@`(YIdtl@`(hIdtlx`(wIduP IduH@`(TIduKU`(rIduh@`(mIdv

`(|IdvX@`(^Idw)7`(K;$I`(K;%I7`(eK;&I7P(BKKMV`(\KP`(KPuI7P(Kb>Y`(3L:,J:`(1L:MnY`(0L:wY`(0L;=NY`(1Md0P(M

u)@`(+MPP(

M.`P(M@P(MF@P(

M&d+`({M&em6`(6M&f:=P M2

|``(LM2-`P(TMLv<``(MO&SPMS5PP)MZ.+P(`(WM`uKU`(uM`uh@`(pM`v

`(M`v4P(

M`v4@`(aM`w)`(MblhP(Mblh`(Mbli`(Mbly`(Mc*:`( Mc``(1Mc
N:t `(8N:t6`(9N;+z`(:N;h``(AN;T\@`(8O

u)@`(*O$I`({O2)3`(CO2[R`(GO?%p`(TOLt@`(^OLtl@`(mOLtlx`(|OLuP OLu)@P(*OLuH@`(YOLuKU`(wOLuh@`(rOLv

`(OLvX@`(cOLw) `(OOMP`(#P:/)9P(P;T\@p(Q

}`(3Qt``(,Qt)``(/QtN `(+Qtn`(.Qt|``(/Qu``(,QuH``(+QuL``(-Qv-`(-Qv4P(+Qv4 P(+Qv4@P(,QvL`(.Q

t@`(ZQ

tl@`(iQ

tlx`(xQ

uP Q

u)@`()Q

uH@`(UQ

uKU`(sQ

uh@`(nQ

`(}Q

v`(dQ

v4`(Q

v4 `(Q

v4@`(Q

vX@`(_Q

w) `(QvH1P Q&~)w`(aQ0v4`(Q0v4 `(	Q0v4@`(	Q@v4P(Q@v4 `(

Q@v4@`(

QN4z`(4QOr`(4QPv

V`(3QPv$]@PR:&n@PR:.=PR:/@P(R;@P R;i`P R;;@P R;@P R;4\@P S:	9`({S:


 XXXy	(ZC,0,.IODPR)		;9GETSEG AND SCAN/W)ILD ONLY
 XXX	(DHC,1,.IOBIN)		;REAhD DATA FILE
 XXX	(MC,2,.IOASC)		;(MAP CHANNEL (OUTPHUT)
 XXX	(RC,3,.hIOASC)		;RECORD LOG FILE CHANNEL
( XXX	(OC,4,.IODPRH)		;OVERLAY CHANNhEL
 XXX	(LC,5,.IODPR)		;LOW SEG C(ODE OVERFLOW 
 XHXX	(HC,6,.IODPR)	h	;HIGH SEG CODE OVERFLOW
 XXX	(SC(,7,.IODPR)		;LOCAHL SYMBOL OVERFLOWh
 XXX	(GC,10,.IODPR)		;GLOBAL SYM(BOL OVERFLOW
XXHX	(FC,11,.IODPR)	h	;FIXUP OVERFLOW
 XXX	(TC,12,.IOD	(PR)		;TEMP CHAN (	HUSED TO REPROCESS	h FIXUPS ETC)
 XX
X	(AC,13,.IODPR)	
(	;ALGOL SYMBOL OV
HERFLOW
 XXX	(PC,
h14,.IODPR)		;[2270] ARGUMENT TYPEC(HECKING OVERFLOW



 XXXX	(%RCh,RC,.IOASC)		;LOG

 FILE
 XXXX	(%SC

(,MC,.IODPR)		;SYM

HBOL FILE
 XXXX	(

h%VC,DC,.IODPR)		;
DXXXX	(%XC,LC,.IO
 XXXX	(%OC,OC,.IODPR)		;OVERLAY FI(LE
 XXXX	(%PC,0,H-1)		;PLOT CHANNEhL (WILL BE 17 AT RUN TIME)
 AT U>m6`(=WMX1 ?q,
 IFIDN <@QA><PLT>,<
  IRPA1 B,<
   B::	BLOCK	1
>>B::	BLWN{y Q"?
KEYMAC	C1ON,<DEFAULT,ALL,NqONE,GLOBAL,NOGLOBQAL,LOCALS,NOLOCAL,ENTRY,NOENTRY,UNqDEFINED,NOUNDEFIN1ED,RELOCATABLE,NORELOCATABLE,ABSOL0UTE,NOABSOLUTE,COPMMON,NOCOMMON,ZERpO,NOZERO>
KEYMAC	CPU,<KA10,KI10,K0L10,KS10>	;[1236]P ADD KS10
KEYMACp	DEB,<,MACRO,DDT,*FORTRAN,FORDDT,*0COBOL,COBDDT,SAILP,SDDT,FAIL,SDDT,SpIMULA,SIMDDT,ALGOL,ALGDDT,*PASCAL,0PASDDT> ;[2036]
PKEYMAC	DEF,<INPUTp,OUTPUT>
KEYMAC	HYL,<LOW,HIGH>
K0EYMAC	LIB,<ANY,F4P0,COBOL,ALGOL,NELpIAC,PL1,BLISS,SAIL,*FORTRAN,MACRO,0FAIL,BCPL,MIDAS,SPIMULA,CBL74,CBL79p,BLS36,BASIC,SITGO,FORTRAN,*PASCAL0,JOVIAL,ADA,C> 
PKEYMAC	MAP,<END,NpOW,ERROR,INCREMENTAL>
KEYMAC	MPS,0<UNSORTED,ALPHABEPTICAL,NUMERICAL>
KEYMAC	MTP,<MTWAT.,MTREW.,MTEOF.,0MTSKR.,MTBSR.,MTEPOT.,MTUNL.,MTBLK.p,MTSKF.,MTBSF.,MTDEC.,MTIND.>
KEY0MAC	ONL,<BOTH,LOWP,HIGH>
KEYMAC	OTpS,<DEFAULT,NONSHA RABLE,SHARABLE,LO 0W,HIGH>
KEYMAC	O PVL,<DEFAULT,ABSOL pUTE,RELOCATABLE,T!REE,NETWORK,PURE,!0WRITABLE,PATH,NOP!PATH,SINGLE,MULTIP!pLE,LOGFILE,NOLOGF"ILE,WARNING,NOWAR"0NING>
KEYMAC	PLT"P,<INCHES,LEAVES,S"pTEPS>
KEYMAC	PTP#,<DEFAULT,PLOTTER#0,PRINTER>	;[2002]#P
KEYMAC	PDV,<NAM#pE,VERSION,START,M$EMORY,PROGRAM,CBL$0OCK,EXPORT>	;[230$P6]
KEYMAC	SEG,<L$pOW,HIGH,DEFAULT,N%ONE>	;[1201]
KEY%0MAC	SSG,<LOW,HIGH%P,NONE,PSECT,DEFAU%pLT> ;[1201] LOW && HIGH MUST BE FIR&0ST 2
KEYMAC	SYM,&P<RADIX50,TRIPLET,&pALGOL>;	
KEYMAC	'SYS,<UNSORTED,ALP'0HABETICAL,NUMERIC'PAL>
KEYMAC	VER,<'pSHORT,MEDIUM,LONG>
,MEDIUM,LONGX:l`(Y
exu`(
Y

t@`(ZY

tl@`(iY

tlx`(xY

uP Y

u)@`()Y

uH@`(UY

uKU`(sY

uh@`(nY

`(}Y

v`(dY

vX@`(_Y

w) `(Yi9`({Y&

Q`(BY&-3`(aY&u<r`(Y&u=`(lY0v4P(
Y0v4 `(Y0v4@`(Y8t<P $Y8tLQP Y8t\P 
Y8u|P>Y8v*1P>Y8v9RP>Y8vH1P>Y:]X<`(Y:]h6@(Y:]kg`(Y:^HV`(Y:n(kYLtlx`(zYLuP YLu)@P(*YLuH@`(WYLuKU`(uYLuh@`(pYLv

`(YLvX@`(aYLw)`(YO$+`(pYO$xV`(>YO%Hv`(?YO%L[`(eYO&|``(%Y\u``("Y\uH``(!Y\uL``(#Y\v-`(#Y\v4P(!Y\v4 P(!Y\v4@P("Y\vL`($[;w`(Q[<Z`(Z[=``(R[=x`(R[D;y`(L[F91P [

u)@`('[Y@`([;@P(	[;Y7`(C[;'`(B[>&N8`(h[OMP`($[g@`(T]l+`(7]mKqh(Y]n`(K^:$]@`(B^:%@`(E^:%V`(E^:/
^:t `(B^:t6`(C^;+z`(D^;h``(K^;T\@`(B_

u)@`((-69:`(t.P(Bv>@P(NS`(7SY``(YXv4P(!Xv4 `(!Xv4@`("Y	nHp(#Y	nRP(*Z.+`(	ZMi<`(Zd+`(

_ZeyS`(_^uKS`(ka9h9p('a9hSp(*a9ip(&a9i\p()a9iyp(*a9jp('a9kp(&a9kp((a9lZp((a9lhP(&a9lhP(&a9liP('a9mp()aIV`(Va%Kq`(ba&<`()a

u)@`(,a`(Ra4`(ka`(aJuI7PV	a[w.@PYa2~L{`(za3&H1p({a>eI7`(2a>f=`(1a?yY`(baC'`(|aJ=h6`(6aJ=k``((aJ>	`(haJ>
>`(e

t=9`(Ye

tlR`(_e

u)@`((e

uX8`([e

uk``(^e

um`(Ze

v9:`(_e

vH@`(ZeY@`(e%
 `(^e%K``(]ef:=`(`ed[@`(oeuh6`(
eum6`(
e&I7P(
e>~H1`(fePt@`([ePtl@`(jePtlx`(yePuP ePuH@`(VePuKU`(tePuh@`(oePv

`(~ePvX@`(`ePw) `(eRv``(ieVt2`(NeVt;y`(Mf:$XS`(5f:/)9@(*f:MnY`(4f:e	V`(4g4;r`(pg4X1`(rg6 `(qg

u)@`(*gv>6`([g>`(g$J9P(g$[RP(g&8wP(gvH@`([g2~D@`(]g<v4P(	g<v4 `(
g<v4@`(
gB

9``(*gN/6`(WgNt2`(OgR

I`(%gR.

``(|gVI7`(0g[`(ng[`(ng^5H3`(5gfl+`(Ggflk`(qgfllV`(UgfmI7`(0gfmJ6`(XgfmK9`(Xgfn93`(Wgfn:=P gfn<Z`(YhE

,`(mhE

h `(mih1`(YiiY`(hij`(+ik`(Tik`(!ikQ`(milp(&il`(|il`(cim1`(^im;`(&inR`(i:`(gitlx`(wiuKU`(ri

u)@`(+i#LZ`(&i&l[w`(i6l@`(li@tlx`({i@uP i@u)@P(,i@uH@`(Xi@uKU`(vi@uh@`(qi@v

`(i@vX@`(bi@w) `(iB<;Z`(miRd`(TiSL-3`(`iSN=1`(k&

P(kN.P`($kV~LP`(k\t``('k\t)``(*k\tN `(&k\tn`()k\t|``(*k\u``('k\uH``(&k\uL``((k\v-`((k\v4P(&k\v4 P(&k\v4@P('k\vL`()md+`(MmMV`(]mm6`(>oK$H:`(q,``(qcAj<P u

u)@`(&u~ p(2~pp(?=``(lJ-3h(S@P EKRP &|qP *i9` /;<+P C%X<P C&

P C&=zP R-\`(R-\	`(#Rd[@P  >}{woP