Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
common.c08
There is 1 other file named common.c08 in the archive. Click here to see a list.
REP 10/11 ;08C1
ND A00MCO,^D11095 ;HIGHEST MCO IN THIS LOAD (26-BITS)
WIT
ND A00MCO,^D11169 ;HIGHEST MCO IN THIS LOAD (26-BITS)
INS 125/42 ;08C2
MONORG+4*PAGSIZ(T1)
MONORG+5*PAGSIZ(T1)
MONORG+6*PAGSIZ(T1)
MONORG+7*PAGSIZ(T1)
INS 123/65 ;08C3
V (KPM,N); ;CONTAINS PM.KPM IF THE CPU HAS AN MCA25 INSTALLED
REP 55/127 ;08C4
SYSTR4: MOVE T1,T2
LSH T1,W2PLSH
MOVE T3,.CPMAP-.CPCDB(T2)
WIT
SYSTR4: MOVE T3,.CPMAP-.CPCDB(T2)
INS 63/127 ;08C5
MOVE T1,T2
LSH T1,W2PLSH
REP 71/127 ;08C6
HRLI T1,(<PM.DCD>B2+PM.WRT)
WIT
APRID T1 ;GET OPTION BITS
TRNN T1,ID.MCA ;MCA25 INSTALLED?
TDZA T1,T1 ;NO
MOVSI T1,(PM.KPM) ;YES
MOVEM T1,.CPKPM-.CPCDB(T2)
MOVE T1,T2
LSH T1,W2PLSH
TLO T1,(<PM.DCD>B2+PM.WRT)
IOR T1,.CPKPM-.CPCDB(T2)
SUM 249155