Trailing-Edge
-
PDP-10 Archives
-
bb-kl11c-bm_tops20_v6_1_atpch1_16
-
autopatch/setspd.c14
There are no other files named setspd.c14 in the archive.
INS 1/1 ;14C1
; *** Edit 63 to SETSPD.MAC by RASPUZZI on 11-Jun-86, for SPR #20381
; Rework edit 62 so that the monitor's entry vector is different at system
; startup.
REP 17/2 ;14C2
VEDIT==VI%DEC+^D22 ;EDIT NUMBER
WIT
VEDIT==VI%DEC+^D63 ;EDIT NUMBER
INS 8/3 ;14C3
;**;[63] Change documentation to comply with the monitor MDR 10-JUN-86
REP 11/3 ;14C4
; 0 CALLED ONCE DURING SYSTEM STARTUP BY RUNDD ROUTINE IN MEXEC.
WIT
; 0 THIS ENTRY IS FUNCTIONALLY EQUIVALENT TO POSITION 1,
; BUT IT IS NOT USED BY THE MONITOR.
;
; 1 CALLED ONCE DURING SYSTEM STARTUP BY RUNDD ROUTINE IN MEXEC.
REP 27/3 ;14C5
;
; 1 THIS ENTRY IF FUNCTIONALLY EQUIVALENT TO POSITION 0,
; BUT IT IS NOT USED BY THE MONITOR.
WIT
; ***This entry vector is used by the monitor at system startup.
INS 6/4 ;14C6
;**;[63] Add 1 line at CSBUFP:+1L MDR 10-JUN-86
SYSTUP: 0 ;[63] System startup flag
REP 71/4 ;14C7
JRST START ;REENTER LOCATION
VSTSPD ;VERSION NUMBER
JRST START3 ;ALTERNATE STARTING LOCATION
JRST START4 ;MTA ONLINE ENTRY VECTOR
WIT
;**;[63] Change comments for entry vectors MDR 10-JUN-86
MONVEC: JRST START0 ;[63] The monitor starts SETSPD here
VSTSPD ;VERSION NUMBER
JRST START3 ;[63] Entry point for making DUMP.CPY
JRST START4 ;[63] MTA/DISK online entry vector
INS 5/7 ;14C8
;**;[63] Add 2 lines at START0:+0L MDR 10-JUN-86
START0: SETOM SYSTUP ;[63] Flag we are system starting up
SKIPA ;[63] Continue with normal entry
REP 9/11 ;14C9
NOBEL1: MOVEI A,400000(D) ;GET LINE DESIGNATOR
WIT
NOBEL1: MOVEI A,.TTDES(D) ;[63] Get line designator
REP 6/12 ;14C10
HRLI P1,400000(B) ;IN CASE NO MORE
WIT
HRLI P1,.TTDES(B) ;[63] In case no more
REP 8/13 ;14C11
MOVEI A,400000(A) ;GET TTY DESIGNATOR
WIT
;**;[63] Add 2 lines at SPDSET:+3L MDR 10-JUN-86
SKIPGE SYSTUP ;[63] Are we system startup?
JRST SPDST1 ;[63] Yes, always use file setting.
MOVEI A,.TTDES(A) ;[63] Get TTY designator
REP 12/13 ;14C12
TRZ A,400000
WIT
TRZ A,.TTDES ;[63]
REP 18/13 ;14C13
TRO A,400000 ;TTY DESIGNATOR
WIT
TRO A,.TTDES ;[63] TTY designator
SUM 172511