Google
 

Trailing-Edge - PDP-10 Archives - bb-jr93e-bb - 7,6/ap015/scmuuo.c15
There are 2 other files named scmuuo.c15 in the archive. Click here to see a list.
 REP 1/1	;15C1
		TITLE SCMUUO - Session Control UUO handler V105
		SUBTTL	W. Nichols & V. Brownell/AJR/Tarl	27 MAY 86
 WIT
		TITLE SCMUUO - Session Control UUO handler V106
		SUBTTL	W. Nichols & V. Brownell/AJR/Tarl	22 JUL 86
 REP 20/1	;15C2
	XP SCMUUO,105
 WIT
	XP SCMUUO,106
 REP 64/9	;15C3
		MCALL (RG,MCSEC0,HIBER##) ;WAIT FOR SOME MEMORY
 WIT
		MCALL (RG,MSEC0,HIBER##) ;WAIT FOR SOME MEMORY
 REP 17/10	;15C4
		 JRST [	MCALL (RG,MCSEC0,STOTAC##) ;CAN'T GET MEMORY, ERROR CODE IN T1
 WIT
		 JRST [	MCALL (RG,MSEC0,STOTAC##) ;CAN'T GET MEMORY, ERROR CODE IN T1
 REP 25/11	;15C5
		MCALL (RG,MCSEC0,STOTAC##);STORE ERROR CODE IN USER'S AC
 WIT
		MCALL (RG,MSEC0,STOTAC##);STORE ERROR CODE IN USER'S AC
 REP 34/20	;15C6
		MCALL (RG,MCSEC0,CHKBPT##) ;RESOLVE USER'S INDIRECTION & INDEXING
 WIT
		MCALL (RG,MSEC0,CHKBPT##) ;RESOLVE USER'S INDIRECTION & INDEXING
 REP 21/21	;15C7
		MCALL (RG,MCSEC0,CHKBPT##);GO ASK VMSER IF THIS BPT IS SAFE
 WIT
		MCALL (RG,MSEC0,CHKBPT##);GO ASK VMSER IF THIS BPT IS SAFE
 REP 19/28	;15C8
		MCALL (RG,MCSEC0,ESLEEP##) ;SCUWAK GETS US OUT OF THIS.
 WIT
		MCALL (RG,MSEC0,ESLEEP##) ;SCUWAK GETS US OUT OF THIS.
 REP 53/29	;15C9
		MCALL (RG,MCSEC0,WAKEJB##);HIBERING ON ASYNC I/O, WAKE IT UP.
	SCUWK2:	LOAD T1,SJJOB,(P1)	;GET JOB NUMBER FOR EWAKE
		MCALL (RG,MCSEC0,EWAKE##);(T1)GET JOB OUT OF EW OR MARK FOR WAKE
 WIT
		MCALL (RG,MSEC0,WAKEJB##);HIBERING ON ASYNC I/O, WAKE IT UP.
	SCUWK2:	LOAD T1,SJJOB,(P1)	;GET JOB NUMBER FOR EWAKE
		MCALL (RG,MSEC0,EWAKE##);(T1)GET JOB OUT OF EW OR MARK FOR WAKE
 REP 21/41	;15C10
		 JRST [MCALL (RG,MCSEC0,STOTAC##) ;STORE ERROR CODE IN USER'S AC
 WIT
		 JRST [MCALL (RG,MSEC0,STOTAC##) ;STORE ERROR CODE IN USER'S AC
 SUM 89897