Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99g-bb - sysini.c08
There is 1 other file named sysini.c08 in the archive. Click here to see a list.
 INS 5/25	;08C1
	IFN FTKLP,<
		MOVE	T1,SYSSIZ##	;HIGHEST ADDRESS IN THE LOW SEGMENT
		LSH	T1,W2PLSH##	;HIGHEST PAGE
		MOVE	T2,.CPKPM##	;KEEP ME BIT OR 0
		MOVE	T3,.CPMAP##	;ADDRESS OF THIS CPU'S MAP
		IORM	T2,(T3)		;TURN ON "KEEP ME" IF THIS CPU HAS AN MCA25
		AOS	T3		;NEXT PAGE
		SOJG	T1,.-2(P2)	;FOR ALL LOW SEGMENT PAGES
	>
 REP 35/30	;08C2
		MOVEI	T2,OUCHTB##+3
 WIT
		MOVEI	T2,OUCHTB##+7
 REP 7/43	;08C3
	ONCMAP::PUSH	P,P1		;SAVE P AC'S
 WIT
	ONCMAP::
	IFN FTKLP,<
		IOR	T2,.CPKPM##	;LITE "KEEP ME" IF THE CPU HAS AN MCA25
	>
		PUSH	P,P1		;SAVE P AC'S
 SUM 56551