Google
 

Trailing-Edge - PDP-10 Archives - BB-4157F-BM_1983 - build/lnklow.unv
There are 3 other files named lnklow.unv in the archive. Click here to see a list.
x
,5@P C
u)@`(WC%}Z`(<CJ,` 
$@R>
	XXX	(DY
$`)	;DYNAMIC DATA

%	XXX	(LC)	;LOW SE
% G CODE
	XXX	(HC)
%@	;HIGH SEG CODE

%`	XXX	(AS)	;ALGOL 
&SYMBOLS
	XXX	(RT
& )	;RELOCATION TAB
&@LE
	XXX	(LS)	;LO
&`CAL SYMBOLS
	XXX
'	(FX)	;FIXUPS
	X
' XX	(BG)	;BOUND GL
'@OBALS
	XXX	(GS)	
'`;GLOBAL SYMBOLS
LOBAL SYMBOLS
CKR`(ACLt@`(CLtl@`(CLtlx`(&CLuP CLu)@P(WCLuH@`(CLuKU`("CLuh@`(CLv
`(+CLvX@`(CLw)E`(/CN5`(OCOMP`(OE$;y`(VE$:`(CEt@`(
`(-Ev8t`(9EvX@`(Ew)Y`(1E2{6`(EJt`(?EJtLu`(9EJuI7`(8EJuX<`(<EJv
z`(BGC.Iz`(CGK%\`(RGK%\	`(RGK%\	`(SGL`(,GLuI7P GLuKVp GSN	 `(~GWN8`(GWMYP I
u)@`(RIY@`(BI,-3`(~I%X8`(IYy`(~I]YP I]YP Ii9P I$`((I$uI7P IR
k`(Idt@`(
Idtl@`(Idtlx`(%IduP IduH@`(IduKU`( Iduh@`(Idv
`()IdvX@`(Idw)7`(.K;$I`(K;%I7`(SK;&`(3KPuI7P(Kb8q`(]L:8t`(]L:8u`(^L:>Y`(^L:,J:`(\L:MnY`([L:wY`([L;=NY`(\Md0P(;M
F`(M
u)@`(VMPP(8M.`P(=M@P(:MF@P(8M&em6`(zM2
|``(wM2-`P(9M:,;y`(MLv<``(cMO&ZPHMR~i9PKMSSPhMS5PP MZ. P(9M`t@`(
`(,M`v4P(bM`v4@`(bM`v4@`(cM`vX@`(M`w)V`(1MblhP(dMblh`(dMbli`(eMbly`(eMc``(uMc
N:t `(cN:t6`(dN;+z`(eN;h``(lN;T\@`(cO
u)@`(VO2)3`(2O2[R`(6O?%p`(OLt@`(OLtl@`(OLtlx`()OLuP OLu)@P(VOLuH@`(	OLuKU`($OLuh@`( OLv
`(-OLvX@`(OLw) `(2OOMP`(NP:/)9P(BP;T\@p(2Q
}`(wQt``(qQt)``(sQtN `(oQtn`(rQt|``(sQu``(pQuH``(pQuL``(rQv-`(qQv4P(oQv4 P(pQv4@P(pQ
t@`(Q
tl@`(Q
tlx`(&Q
uP Q
u)@`(UQ
uH@`(Q
uKU`(!Q
uh@`(Q
v
`(*Q
v`(Q
v4`(\Q
v4 `(]Q
v4@`(]Q
vX@`(Q
w) `(/QvH1P Q&~)w`(PQ0v4`(^Q0v4 `(^Q0v4@`(_Q@v4P(aQ@v4 `(aQ@v4@`(bQN4z`(xQOr`(xQPv
V`(wQPv$]@PR:&n@PR:.=PR:/@P(R;@P R;i`P R;;@P R;@P R;4\@P S:	9`(&S:


 XXX	y`	(ZC,0,.IODPR)		;	y@GETSEG AND SCAN/W	z ILD ONLY
 XXX	(D	z@C,1,.IOBIN)		;REA	z`D DATA FILE
 XXX	{	(MC,2,.IOASC)		;	{ MAP CHANNEL (OUTP	{@UT)
 XXX	(RC,3,.	{`IOASC)		;RECORD L	|OG FILE CHANNEL
	|  XXX	(OC,4,.IODPR	|@)		;OVERLAY CHANN	|`EL
 XXX	(LC,5,.I	}ODPR)		;LOW SEG C	} ODE OVERFLOW 
 X	}@XX	(HC,6,.IODPR)		}`	;HIGH SEG CODE O	~VERFLOW
 XXX	(SC	~ ,7,.IODPR)		;LOCA	~@L SYMBOL OVERFLOW	~`
 XXX	(GC,10,.IO	DPR)		;GLOBAL SYM	 BOL OVERFLOW
 XX	@X	(FC,11,.IODPR)		`	;FIXUP OVERFLOW

 XXX	(TC,12,.IOD
 PR)		;TEMP CHAN (
@USED TO REPROCESS
` FIXUPS ETC)
 XX
X	(AC,13,.IODPR)	
 	;ALGOL SYMBOL OV
@ERFLOW



 XX
`XX	(%RC,RC,.IOASC
)		;LOG FILE
 XX
 XX	(%SC,MC,.IODPR
@)		;SYMBOL FILE

` XXXX	(%VC,DC,.IO
DPR)		;SAVE/SSAVE
  FILE
 XXXX	(%XC
@,LC,.IODPR)		;XPN
` FILE
 XXXX	(%OC
,OC,.IODPR)		;OVE
 RLAY FILE
 XXXX	
@(%PC,0,-1)		;PLOT
` CHANNEL (WILL BE
17 AT RUN TIME)
AT`RUN{TIME) 
28c
 IFIDN <
3A><PLT>,<
  IRP
38 B,<
   B::	BLOCK	1
>>B::	BLWN{y YX
KEYMAC	C`ON,<DEFAULT,ALL,N ONE,GLOBAL,NOGLOBAL,LOCALS,NOLOCAL@,ENTRY,NOENTRY,UN DEFINED,NOUNDEFIN`ED,RELOCATABLE,NO@RELOCATABLE,ABSOL`UTE,NOABSOLUTE,COMMON,NOCOMMON,ZER O,NOZERO>
KEYMAC@	CPU,<KA10,KI10,K`L10,KS10>	;[1236] ADD KS10
IFE FT MANTIS,<
KEYMAC	@DEB,<,MACRO,DDT,*`FORTRAN,FORDDT,*COBOL,COBDDT,SAIL, SDDT,FAIL,SDDT,SI@MULA,SIMDDT,ALGOL`,ALGDDT,*PASCAL,PASDDT,JOVIAL,DDT> 		;[1267] ADD ALG@OL AND ALGDDT
>	`;[1422] ADD PASDD	T AND PASCAL
	;[	 1466] ADD JOVIAL 	@AND DDT
IFN FTMA	`NTIS,<
KEYMAC	DE
B,<,MACRO,DDT,*FO
 RTRAN,MANTIS,*COB
@OL,COBDDT,SAIL,SD
`DT,FAIL,SDDT,SIMULA,SIMDDT,ALGOL,A LGDDT,*PASCAL,PAS@DDT,JOVIAL,DDT>		`;[1267] ADD ALGOL
 AND ALGDDT
>	;[
 1422] ADD PASDDT 
@AND PASCAL
	;[14
`66]DADD JOVIAL AN
KEYMAC	DEFTPUT>
KEYMAC	HYL,<LOW,H
KEYMAC	LIB,<ANY,F40,COBOL,AL GOL,NELIAC,PL1,BL@ISS,SAIL,*FORTRAN`,MACRO,FAIL,BCPL,MIDAS,SIMULA,CBL7 4,CBL79,BLS36,BAS@IC,SITGO,FORTRAN,`*PASCAL>
KEYMAC	MAP,<END,NOW,ERRO R,INCREMENTAL>
K@EYMAC	MPS,<UNSORT`ED,ALPHABETICAL,NUMERICAL>
KEYMAC 	MTP,<MTWAT.,MTRE@W.,MTEOF.,MTSKR.,`MTBSR.,MTEOT.,MTUNL.,MTBLK.,MTSKF. ,MTBSF.,MTDEC.,MT@IND.>
KEYMAC	ONL`,<BOTH,LOW,HIGH>
KEYMAC	OTS,<DEFA ULT,NONSHARABLE,S@HARABLE,LOW,HIGH>`
KEYMAC	OVL,<DEFAULT,ABSOLUTE,REL OCATABLE,TREE,NET@WORK,PURE,WRITABL`E,PATH,NOPATH,SINGLE,MULTIPLE,LOGF ILE,NOLOGFILE,WAR@NING,NOWARNING>
`KEYMAC	PLT,<INCHES,LEAVES,STEPS>
 KEYMAC	PTP,<DEFAU@LT,PLOTTER,PRINTE`R>	;[2002]
KEYMAC	PDV,<NAME,VERSI ON,START,MEMORY,P@ROGRAM,CBLOCK>	;[`1423]
KEYMAC	SEG,<LOW,HIGH,DEFAUL T,NONE>	;[1201]
@KEYMAC	SSG,<LOW,H`IGH,NONE,PSECT,DEFAULT> ;[1201] LO W & HIGH MUST BE @FIRST 2
KEYMAC	S`YM,<RADIX50,TRIPLET,ALGOL>;	
KEYM AC	SYS,<UNSORTED,@ALPHABETICAL,NUME`RICAL>
KEYMAC	VER,<SHORT,MEDIUM,LONG>
,MEDIUM,LX:l`(6Y
exu`(6Y
t@`(
Y
tl@`(Y
tlx`(%Y
uP Y
u)@`(TY
uH@`(Y
uKU`(!Y
uh@`(Y
v
`(*Y
v`(Y
vX@`(Y
w) `(.Yi9`('Y&
Q`(Y&-3`(`(Y0v4P(`Y0v4 `(`Y0v4@`(aY8t<P $Y8tLQP Y8t\P 
Y8u|P>Y8v*1P>Y8v9RP>Y8vH1P>Y:]X<`(;Y:]h6@(-Y:]kg`(;Y:^HV`(7Y:n
Y>>M`(	Y?=Kq`(Y?>=1`(YLt@`(
YLtl@`(YLtlx`('YLuP YLu)@P(UYLuH@`(YLuKU`(#YLuh@`(YLv
`(,YLvX@`(YLw)6`(0YO$+`(YO%L[`(TYO&)``(jY\tN `(fY\tn`(iY\t|``(jY\u``(gY\uH``(gY\uL``(iY\v-`(hY\v4P(fY\v4 P(gY\v4@P(g[;w`(|[<Z`([=``(}[=x`(B[D;y`(w[
u)@`(S[Y@`(D[;@P(5['Dky`([;Y7`([;'`([>&N8`(W[OMP`(O[g@`(D]mKqh(	]n`(m^:%@`(p^:%V`(p^:/
^:t `(m^:t6`(n^;+z`(o^;h``(v^;T\@`(m_
u)@`(T-69:`(t.P(4aBv>@P(4aNS`(baSY``(aXv4P(KaXv4w`(LaXv4@`(LaY	nHp(NaY	nRP(TaZ.+`(5aZMi<`(@aZd+`(7eZeyS`(?^uKS`(a9h9p(la9hSp(na9ip(ka9i\p(na9iyp(oa9jp(la9kp(ka9kp(ma9lZp(ma9lhP(ka9lhP(ka9liP(laIV`(a%Kq`(Qa&<`(Sa`(Aa4`(Za `(Ba uI7P 	a w.@P a2~L{`(&a3&H1p(&a>eI7`(va>f=`(ua?yY`(PaC'`((aJ=h6`(zaJ=k``(RaJ>	`(XaJ>
>`(>e
t=9`(Ie
tlR`(Me
u)@`(Se
uX8`(Je
uk``(Me
um`(Je
v9:`(Ne
vH@`(IeY@`(Eeex`P ef:=`(Ned[@`(euh6`(6eum6`(5e&I7P(6e>~H1`(TePt@`(
ePtl@`(ePtlx`('ePuP ePuH@`(ePuKU`("ePuh@`(ePv
`(+ePvX@`(ePw) `(0eRv``(eVt2`(yeVt;y`(xf:$XS`(`f:/)9@(Tf:MnY`(f:e	V`(g4;r`(g4X1`(g6 `(g
u)@`(Ug5MV`(g$S`(>g$J9P(?g$[RP(Bg&8wP(>gvH@`(Kg2~D@`(Lg<v4P(_g<v4 `(_g<v4@`(`gB
9``(TgN/6`(gNt2`(zgR
I`(PgR.
``('gVI7`(tg[`(g[`(g^5H3`(`gflk`(gfllV`(gfmI7`(tgfmJ6`(gfn93`(gfn<Z`(hE
,`(hE
h `(ih1`(
iiY`(ij`(oik`(ik`(fikQ`(ilp(kil`()il`(im1`(im;`(kinR`(.i:`(Witlx`(%iuKU`( i
u)@`(Wi#LZ`(Qi&l[w`(i6-3`(iSN=1`(
k&
P(7kN.P`(NkV~LP`(k\t``(lk\t)``(nk\tN `(kk\tn`(nk\t|``(ok\u``(lk\uH``(kk\uL``(mk\v-`(mk\v4P(kk\v4 P(kk\v4@P(lmMV`(mm6`(|oK$H:`(Bq,``(GqcAj<P u
u)@`(Ru~ p(2~pp(?=``(J-3h(ES@P EKRP &|qP *i9` /;<+P C%X<P C&
P C&=zP R-\`(R-\	`(Rd[@P >}{woP