Google
 

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