RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (2)     143  OUTPUT STRINGS

   (3)     180  RSX$FORCEEXIT/RSX$RETEXIT - TERMINATION HANDLER

   (4)     208  RSX$ABORT - ABORT IMAGE EXECUTION

   (5)     306  PRINT ERROR MESSAGE TO ERROR

   (6)     373  RSX$EXST - EXIT WITH STATUS

   (7)     409  RSX$EXIT - EXIT

   (8)     443  RSX$INTERNEXIT - TERMINATE IMAGE EXECUTION

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   1

V03.0                                                                                                                            (1)



                                     0000     1 	.TITLE	RSXTERMIN - IMAGE EXIT,TERMINATION AND ABORT ROUTINES

                                     0000     2 	.IDENT	/V03.0/		;

                                     0000     3 

                                     0000     4 ;

                                     0000     5 ; COPYRIGHT (C) 1977

                                     0000     6 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000     7 ;

                                     0000     8 ; THIS SOFTWARE IS FURNISHED  UNDER A LICENSE FOR USE ONLY ON A SINGLE

                                     0000     9 ; COMPUTER  SYSTEM AND  MAY BE  COPIED ONLY WITH  THE INCLUSION OF THE

                                     0000    10 ; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,

                                     0000    11 ; MAY NOT BE PROVIDED OR  OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

                                     0000    12 ; EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE

                                     0000    13 ; TERMS.  TITLE TO AND  OWNERSHIP OF THE  SOFTWARE  SHALL AT ALL TIMES

                                     0000    14 ; REMAIN IN DEC.

                                     0000    15 ;

                                     0000    16 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE

                                     0000    17 ; AND SHOULD  NOT BE CONSTRUED  AS A COMMITMENT  BY DIGITAL  EQUIPMENT

                                     0000    18 ; CORPORATION.

                                     0000    19 ;

                                     0000    20 ; DEC ASSUMES  NO  RESPONSIBILITY  FOR  THE USE OR  RELIABILITY OF ITS

                                     0000    21 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.

                                     0000    22 

                                     0000    23 ;++

                                     0000    24 ; FACILITY:

                                     0000    25 ;

                                     0000    26 ;	STARLET RSX11M COMPATIBILITY MODE EMULATOR

                                     0000    27 ;

                                     0000    28 ; ABSTRACT:

                                     0000    29 ;

                                     0000    30 ;	TERMINATION AND ABORT ROUTINES

                                     0000    31 ;--

                                     0000    32 ;

                                     0000    33 ; AUTHOR: R.HEINEN 4-NOV-76

                                     0000    34 ;

                                     0000    35 	

                                     0000    36 ;

                                     0000    37 ; EXTERNAL SYMBOLS

                                     0000    38 ;

                                     0000    39 	$RSXDEF			; DEFINE RSX SYMBOLS

                                     0000    40 	LBLDF$			; DEFINE LABEL OFFSETS

                                     0000    41 ;

                                     0000    42 ; RMS DEFINITIONS

                                     0000    43 ;

                                     0000    44  

                                     0000    45 	.IF NDF	C$$ORE

                                     0000    46  

                                     0000    47 	$FABDEF				; DEFINE FAB

                                     0000    48 	$RABDEF				; DEFINE RAB

                                     0000    49  

                                     0000    50 	.ENDC

                                     0000    51  

                                     0000    52  

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   2

V03.0           OUTPUT STRINGS                                                                                                   (2)



                                     0000    54 	.SBTTL	OUTPUT STRINGS

                                     0000    55  

                                 00000000    56 	.PSECT	RSXPURE,NOEXE,NOWRT,LONG

                                     0000    57  

                                     0000    58 ;

                                     0000    59 ; TASK ABORT MESSAGE

                                     0000    60 ;

                                     0000    61 NAMEDABORT:

                           00000025' 0000    62 	.LONG	20$-10$

                           00000008' 0004    63 	.LONG	10$

54 41 50 4D 4F 43 2D 46 2D 58 53 52  0008    64 10$:	.ASCII	/RSX-F-COMPAT, "!AC" TERMINATED -- !%D/

4D 52 45 54 20 22 43 41 21 22 20 2C  0014       

25 21 20 2D 2D 20 44 45 54 41 4E 49  0020       

                                 44  002C       

                                     002D    65 20$:

                           00000006' 002D    66 CAUSE:	.LONG	20$-10$

                           00000035' 0031    67 	.LONG	10$

                  44 41 21 58 53 52  0035    68 10$:	.ASCII	/RSX!AD/

                                     003B    69 20$:	

                                     003B    70 ;

                                     003B    71 ; COMPATIBILITY MODE TRAP TERMINATION REGISTER OUTPUT MESSAGES

                                     003B    72 ;

                                     003B    73 REGM:	

                           0000001B' 003B    74 	.LONG	20$-10$

                           00000043' 003F    75 	.LONG	10$

54 41 50 4D 4F 43 2D 46 2D 58 53 52  0043    76 10$:	.ASCII	/RSX-F-COMPAT, !AC = !OW !XW/

20 57 4F 21 20 3D 20 43 41 21 20 2C  004F       

                           57 58 21  005B       

                                     005E    77 20$:

                                     005E    78 ;

                                     005E    79 ; REGISTER LINES

                                     005E    80 ;

                        00 43 50 02  005E    81 PCM:	.ASCIZ	<2>/PC/

                        00 53 50 02  0062    82 PSM:	.ASCIZ	<2>/PS/

                        00 30 52 02  0066    83 R0M:	.ASCIZ	<2>/R0/

                        00 31 52 02  006A    84 R1M:	.ASCIZ	<2>/R1/

                        00 32 52 02  006E    85 R2M:	.ASCIZ	<2>/R2/

                        00 33 52 02  0072    86 R3M:	.ASCIZ	<2>/R3/

                        00 34 52 02  0076    87 R4M:	.ASCIZ	<2>/R4/

                        00 35 52 02  007A    88 R5M:	.ASCIZ	<2>/R5/

                        00 50 53 02  007E    89 SPM:	.ASCIZ	<2>/SP/

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   3

V03.0           RSX$FORCEEXIT/RSX$RETEXIT - TERMINATION HANDLER                                                                  (3)



                                     0082    91 	.SBTTL	RSX$FORCEEXIT/RSX$RETEXIT - TERMINATION HANDLERS

                                     0082    92  

                                 00000000    93 	.PSECT	RSXCODE,NOWRT

                                     0000    94 ;++

                                     0000    95 ; RSX$FORCEEXIT - FORCE EXIT TERMINATION HANDLER FOR THE RSX

                                     0000    96 ; RSX$RETEXIT - NULL EXIT HANDLER

                                     0000    97 ;

                                     0000    98 ; FUNCTIONAL DESCRIPTION:

                                     0000    99 ;

                                     0000   100 ; THIS ROUTINE IS CALLED WHEN THIS IMAGE IS TO BE EXITED AS DIRECTED

                                     0000   101 ; FROM AN EXTERNAL SOURCE. THE ACTION IS TO CAUSE A TERMINATION MESSAGE

                                     0000   102 ; SET ON THE ERROR DEVICE.

                                     0000   103 ;

                                     0000   104 ; INPUTS:

                                     0000   105 ;

                                     0000   106 ; OUTPUTS:

                                     0000   107 ;

                                     0000   108 ;	CONTROL IS PASSED TO THE RSX TERMINATION ROUTINES

                                     0000   109 ;	REASON = AB_ABORT

                                     0000   110 ;--

                                     0000   111 RSX$FORCEEXIT::				; ABORTED IMAGE EXECUTION

                               0000  0000   112 	.WORD	0

            50   0006805C 8F     D0  0002   113 	MOVL	#RSX$_EXTERNABRT,R0	; SET STATUS

                          0105   31  0009   114 	BRW	RSX$INTERNEXIT		; ABORT EXECUTION

                                     000C   115 RSX$RETEXIT::				; NO ACTION EXIT HANDLER

                               0000  000C   116 	.WORD	0

                                 04  000E   117 	RET				; RETURN TO CALLER

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   4

V03.0           RSX$ABORT - ABORT IMAGE EXECUTION                                                                                (4)



                                     000F   119 	.SBTTL	RSX$ABORT - ABORT IMAGE EXECUTION

                                     000F   120 ;++

                                     000F   121 ; RSX$ABORT - ABORT EXECUTION AS A RESULT OF AN UNVECTORED CM TRAP OR RSX ERROR

                                     000F   122 ;

                                     000F   123 ; FUNCTIONAL DESCRIPTION:

                                     000F   124 ;

                                     000F   125 ; THIS ROUTINE IS ENTERED AS A RESULT OF AN UNVECTORED CM TRAP OR AN ERROR

                                     000F   126 ; IN THE EXECUTION OF THE RSX.

                                     000F   127 ;

                                     000F   128 ; INPUTS:	

                                     000F   129 ;

                                     000F   130 ;	R0 = ABORT CODE

                                     000F   131 ;	R10 = ADDRESS OF THE IMAGE DATA BASE

                                     000F   132 ;	R11 = ADDRESS OF THE IMAGE HEADER

                                     000F   133 ;

                                     000F   134 ; OUTPUTS:

                                     000F   135 ;

                                     000F   136 ;  THE RSX CALLER IS RETURNED TO WITH R0 SIGNALING THE ERROR.

                                     000F   137 ;--

                                     000F   138 ACCVIO:

                                     000F   139 	$EXIT_S	R9			; EXIT WITH OUT MESSAGE

                                     0018   140 RSX$ABORT::				; ABORT A CM IMAGE

       0004'CF       FFF0 CF     9E  0018   141 	MOVAB	W^RSX$RETEXIT,W^RSX$A_EXITBLOCK+4; CHANGE ADDRESS OF EXIT

            59            50     D0  001F   142 	MOVL	R0,R9			; COPY ABORT REASON

            5A       0000'CF     9E  0022   143 	MOVAB	W^RSX$A_IMPURE,R10	; ADDRESS IMPURE DATA BASE

                                     0027   144 ;

                                     0027   145 ; MAKE SURE THAT THE PER IMAGE IMPURE DATA BASE IS ACCESSIBLE

                                     0027   146 ;

                                     0027   147 	IFNORD	#I_LENGTH,(R10),ACCVIO	; IF NOT THEN EXIT DIRECTLY

                                     002F   148 ;

                                     002F   149 ; OUTPUT HEADER MESSAGE

                                     002F   150 ;

         0C AA         10 AA     9E  002F   151 	MOVAB	I_SCRATCH+16(R10),I_SCRATCH+12(R10); SET UP BUFFER DESC.

         04 AA         10 AA     9E  0034   152 	MOVAB	I_SCRATCH+16(R10),I_SCRATCH+4(R10);

         08 AA         64 8F     9A  0039   153 	MOVZBL	#100,I_SCRATCH+8(R10)	;

            50       0000'CF     9E  003E   154 	MOVAB	W^NAMEDABORT,R0		; ASSUME NAMED ABORT MESSAGE

            53       011C CA     9E  0043   155 	MOVAB	I_ASCIINAME(R10),R3	; ADDRESS NAME STRING

                                     0048   156 10$:	$FAO_S	(R0),I_SCRATCH(R10),I_SCRATCH+8(R10),R3,#0

                          007A   30  005A   157 	BSBW	RSX$PRINTERR		; PRINT ERROR

                                     005D   158 ;

                                     005D   159 ; PRINT DESCRIPTION LINE

                                     005D   160 ;

         60 AA         64 AA     9E  005D   161 	MOVAB	I_SCRATCH+100(R10),I_SCRATCH+96(R10)

         5C AA            28     9A  0062   162 	MOVZBL	#40,I_SCRATCH+92(R10)

                                     0066   163  

                                     0066   164 	.IF NDF	C$$ORE

                                     0066   165  

                                     0066   166 	$GETMSG_F	R9,I_SCRATCH+92(R10),I_SCRATCH+92(R10),#7

                                     0066   167  

                                     0066   168 	.IFF

                                     0066   169  

                                     0066   170 	GETMSG_S	R9,I_SCRATCH+92(R10),I_SCRATCH+92(R10)

                                     0075   171  

                                     0075   172 	.ENDC

                                     0075   173  

                                     0075   174 	$FAO_S	W^CAUSE,I_SCRATCH(R10),I_SCRATCH+8(R10),I_SCRATCH+92(R10),I_SCRATCH+96(R10)

                          0049   30  008B   175 	BSBW	RSX$PRINTERR		; OUTPUT MESSAGE

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   5

V03.0           RSX$ABORT - ABORT IMAGE EXECUTION                                                                                (4)



                                     008E   176 ;

                                     008E   177 ; OUTPUT PC

                                     008E   178 ;

         04 AA         10 AA     9E  008E   179 	MOVAB	I_SCRATCH+16(R10),I_SCRATCH+4(R10); 

            52       003B'CF     9E  0093   180 	MOVAB	W^REGM,R2		; ADDRESS GENERAL FORM

            53       005E'CF     9E  0098   181 	MOVAB	W^PCM,R3		; ADDRESS SPECIFIC MESSAGE

            54       0184 CA     9E  009D   182 	MOVAB	I_PC(R10),R4		; ADDRESS DATA

                          1F     10  00A2   183 	BSBB	50$			; OUTPUT IT

                                     00A4   184 ;

                                     00A4   185 ; OUTPUT THE PSL

                                     00A4   186 ;

            53       0062'CF     9E  00A4   187 	MOVAB	W^PSM,R3		; OUTPUT PSL

                          18     10  00A9   188 	BSBB	50$			; 

                                     00AB   189 ;

                                     00AB   190 ; OUTPUT THE REGISTERS

                                     00AB   191 ;

            53       0066'CF     9E  00AB   192 	MOVAB	W^R0M,R3		; ADDRESS NORMAL REGISTER MESSAGES

            54   00000000'9F     9E  00B0   193 	MOVAB	@#CTL$AL_CMCNTX,R4	; ADDRESS REGISTER CONTENTS

                          0A     10  00B7   194 20$:	BSBB	50$			; OUTPUT THE LINE

       007E'CF            83     D1  00B9   195 	CMPL	(R3)+,W^SPM		; REGISTER 6 DONE?

                          F7     12  00BE   196 	BNEQ	20$			; IF NEQ THEN NO

                                     00C0   197 ;

                                     00C0   198 ; COMPLETE THE OPERATION BY EXITING

                                     00C0   199 ;

                                     00C0   200 40$:					;

                                     00C0   201  

                                     00C0   202 	.IF NDF	C$$ORE

                                     00C0   203  

                                     00C0   204 	BITW	#TS$PMD,I_STATE+2(R10)	; PMD REQUEST?

                                     00C0   205 	BEQL	45$			; IF EQL THEN NO

                                     00C0   206 	BSBW	RSX$PMD			; PMD THE IMAGE

                                     00C0   207  

                                     00C0   208 	.ENDC

                                     00C0   209  

                          0058   31  00C0   210 45$:	BRW	INTERNEXIT		; EXIT THE IMAGE

                                     00C3   211 ;

                                     00C3   212 ; UTILITY OUTPUT SUBROUTINE

                                     00C3   213 ;

                                     00C3   214 50$:	

                                     00C3   215 	$FAO_S	(R2),I_SCRATCH(R10),I_SCRATCH+8(R10),R3,(R4)+,(R4)

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   6

V03.0           PRINT ERROR MESSAGE TO ERROR                                                                                     (5)



                                     00D7   217 	.SBTTL	PRINT ERROR MESSAGE TO ERROR

                                     00D7   218 ;

                                     00D7   219 ;++

                                     00D7   220 ; RSX$PRINTERR - PRINT ERROR MESSAGE ON ERROR DEVICE

                                     00D7   221 ;

                                     00D7   222 ; FUNCTIONAL DESCRIPTION:

                                     00D7   223 ;

                                     00D7   224 ; THE ROUTINE OUTPUTS A MESSAGE ON THE ERROR DEVICE.

                                     00D7   225 ;

                                     00D7   226 ; INPUTS:

                                     00D7   227 ;

                                     00D7   228 ;	I_SCRATCH,I_SCRATCH+4 IS THE STRING DESCRIPTER

                                     00D7   229 ;

                                     00D7   230 ;	R10 = ADDRESS OF THE IMAGE IMPURE DATA BASE

                                     00D7   231 ;	R11 = ADDRESS OF THE IMAGE

                                     00D7   232 ;

                                     00D7   233 ; OUTPUTS:

                                     00D7   234 ;

                                     00D7   235 ;	ALL REGISTERS ARE PRESERVED.

                                     00D7   236 ;--

                                     00D7   237 RSX$PRINTERR::				; PRINT ERROR ON ERROR DEVICE

                          06     BB  00D7   238 	PUSHR	#^M<R1,R2>		; SAVE REGISTERS

                                     00D9   239  

                                     00D9   240 	.IF NDF	C$$ORE

                                     00D9   241  

                                     00D9   242 	MOVAB	W^RSX$A_FAB,R2		; ADDRESS FAB

                                     00D9   243 	CLRW	FAB$W_IFI(R2)		; DISCONNECT

                                     00D9   244 	MOVAB	W^RSX$T_SYSERROR,R0	; ADDRESS NAME OF SYSERROR DEVICE

                                     00D9   245 	MOVB	(R0)+,FAB$B_FNS(R2)	; INSERT NAME IN FAB

                                     00D9   246 	MOVL	R0,FAB$L_FNA(R2)	;

                                     00D9   247 	MOVB	#FAB$M_CR,FAB$B_RAT(R2)	; SET CARRIAGE CONTROL DESIRED

                                     00D9   248 	$OPEN	FAB=R2			; OPEN SYS$ERROR

                                     00D9   249 	BLBC	R0,100$			; IF LOW CLEAR THEN ERROR

                                     00D9   250 	MOVW	FAB$W_IFI(R2),W^RAB$W_ISI+RSX$A_RAB; CONNECT RAB

                                     00D9   251 	CVTWL	FAB$W_IFI(R2),-(SP)	;

                                     00D9   252 	MOVZBW	I_SCRATCH(R10),W^RAB$W_RSZ+RSX$A_RAB;

                                     00D9   253 	MOVL	I_SCRATCH+4(R10),W^RAB$L_RBF+RSX$A_RAB;

                                     00D9   254 50$:	$PUT	RAB=W^RSX$A_RAB		; OUTPUT MESSAGE

                                     00D9   255 	CLRW	FAB$W_IFI(R2)		; DISCONNECT FAB

                                     00D9   256 	MOVAB	W^RSX$T_SYSOUTPUT,R0	; ADDRESS NAME OF SYSOUTPUT DEVICE

                                     00D9   257 	MOVB	(R0)+,FAB$B_FNS(R2)	; INSERT DATA IN FAB

                                     00D9   258 	MOVL	R0,FAB$L_FNA(R2)	;

                                     00D9   259 	$OPEN	FAB=R2			; OPEN SYS$OUT

                                     00D9   260 	BLBC	R0,100$			; IF LOW CLEAR THEN ERROR

                                     00D9   261 	CMPW	W^RAB$W_ISI+RSX$A_RAB,FAB$W_IFI(R2); OUTPUT SAME AS ERROR?

                                     00D9   262 	BEQL	100$			; IF EQL THEN DONE

                                     00D9   263 	MOVW	FAB$W_IFI(R2),W^RAB$W_ISI+RSX$A_RAB

                                     00D9   264 	BRB	50$			; OUTPUT IT AGAIN

                                     00D9   265 100$:	$CLOSE	FAB=R2			;

                                     00D9   266 	CVTLW	(SP)+,FAB$W_IFI(R2)	; RESTORE ERROR IFI

                                     00D9   267 	$CLOSE	FAB=R2			;

                                     00D9   268 	MOVZBL	#SS$_NORMAL,R0		; ALWAYS SUCCESS

                                     00D9   269  

                                     00D9   270 	.IFF

                                     00D9   271  

            51            6A     9B  00D9   272 	MOVZBW	I_SCRATCH(R10),R1	; LENGTH OF TRANSFER (BYTES)

                                     00DC   273 	$OUTPUT	-			; OUTPUT TO TI DEVICE

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   7

V03.0           PRINT ERROR MESSAGE TO ERROR                                                                                     (5)



                                     00DC   274 		CHAN=RSX$A_TIODEV+LUT_CHAN,- ; CHANNEL NUMBER

                                     00DC   275 		BUFFER=@I_SCRATCH+4(R10),- ; BUFFER ADDRESS

                                     00DC   276 		LENGTH=R1		; LENGTH OF TRANSFER IN BYTES

            50       0000'8F     3C  00FE   277 	MOVZWL	#SS$_NORMAL,R0		; ALWAYS SUCCEEDS

                                     0103   278  

                                     0103   279 	.ENDC

                                     0103   280  

                          06     BA  0103   281 	POPR	#^M<R1,R2>		; RESTORE REGISTERS

                                 05  0105   282 	RSB

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   8

V03.0           RSX$EXST - EXIT WITH STATUS                                                                                      (6)



                                     0106   284 	.SBTTL	RSX$EXST - EXIT WITH STATUS

                                     0106   285 ;++

                                     0106   286 ; RSX$EXST - RSX11M EXIT WITH STATUS DIRECTIVE

                                     0106   287 ;

                                     0106   288 ; FUNCTIONAL DESCRIPTION:

                                     0106   289 ;

                                     0106   290 ; THIS ROUTINE IMPLEMENTS THE RSX11M EXIT WITH STATUS DIRECTIVE.

                                     0106   291 ;

                                     0106   292 ; CALLING SEQUENCE:

                                     0106   293 ;

                                     0106   294 ;	CALLED VIA CASE FROM RSXEXCEPT.

                                     0106   295 ;

                                     0106   296 ; INPUTS:

                                     0106   297 ;

                                     0106   298 ;	R5 = ADDRESS OF THE DPB

                                     0106   299 ;	R6 = ADDRESS OF THE IMAGE STACK

                                     0106   300 ;	R10 = ADDRESS OF THE IMAGE IMPURE DATA BASE

                                     0106   301 ;	R11 = ADDRESS OF THE IMAGE

                                     0106   302 ;

                                     0106   303 ; OUTPUTS:

                                     0106   304 ;

                                     0106   305 ;	R10,R11 ARE PRESERVED.

                                     0106   306 ;

                                     0106   307 ;--

                                     0106   308  

                                     0106   309 	.ENABL	LSB

                                     0106   310  

                                     0106   311 RSX$EXST::				; EXIT WITH STATUS

                                     0106   312 ;***********************************************************

                                     0106   313 ;

                                     0106   314 ; TEMPORARY

                                     0106   315 ;

            50            65     3C  0106   316 	MOVZWL	(R5),R0			; SET STATUS DIRECTLY

                                     0109   317 ;***********************************************************

                          06     11  0109   318 	BRB	RSX$INTERNEXIT		; EXIT IMAGE EXECUTION

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page   9

V03.0           RSX$EXIT - EXIT                                                                                                  (7)



                                     010B   320 	.SBTTL	RSX$EXIT - EXIT

                                     010B   321 ;++

                                     010B   322 ; RSX$EXIT - RSX11M EXIT DIRECTIVE

                                     010B   323 ;

                                     010B   324 ; FUNCTIONAL DESCRIPTION:

                                     010B   325 ;

                                     010B   326 ; THIS ROUTINE IMPLEMENTS THE RSX11M EXIT DIRECTIVE.

                                     010B   327 ;

                                     010B   328 ; CALLING SEQUENCE:

                                     010B   329 ;

                                     010B   330 ;	CALLED VIA CASE FROM RSXEXCEPT.

                                     010B   331 ;

                                     010B   332 ; INPUTS:

                                     010B   333 ;

                                     010B   334 ;	R5 = ADDRESS OF THE DPB

                                     010B   335 ;	R6 = ADDRESS OF THE IMAGE STACK

                                     010B   336 ;	R10 = ADDRESS OF THE IMAGE IMPURE DATA BASE

                                     010B   337 ;	R11 = ADDRESS OF THE IMAGE

                                     010B   338 ;

                                     010B   339 ; OUTPUTS:

                                     010B   340 ;

                                     010B   341 ;	R10,R11 ARE PRESERVED.

                                     010B   342 ;

                                     010B   343 ;--

                                     010B   344 RSX$EXIT::				; EXIT

            50         00'8F     9A  010B   345 	MOVZBL	#SS$_NORMAL,R0		; SET SUCCESS

                                     010F   346  

                                     010F   347 	.IF DF	C$$ORE

                                     010F   348  

                          3E     11  010F   349 	BRB	20$			; DO NOT DEALLOCATE RESOURCES

                                     0111   350  

                                     0111   351 	.ENDC

                                     0111   352  

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page  10

V03.0           RSX$INTERNEXIT - TERMINATE IMAGE EXECUTION                                                                       (8)



                                     0111   354 	.SBTTL RSX$INTERNEXIT - TERMINATE IMAGE EXECUTION

                                     0111   355 ;++

                                     0111   356 ; RSX$INTERNEXIT - TERMINATE IMAGE EXECUTION

                                     0111   357 ;

                                     0111   358 ; FUNCTIONAL DESCRIPION:

                                     0111   359 ;

                                     0111   360 ; THIS ROUTINE CLEANS UP THE EXECUTION OF THIS IMAGE AND RETURNS TO THE

                                     0111   361 ; ORIGIONAL CALLER.

                                     0111   362 ; 

                                     0111   363 ; INPUTS:

                                     0111   364 ;

                                     0111   365 ;	R0 = STATUS OF THE EXECUTION

                                     0111   366 ;	R10 = ADDRESS OF THE IMAGE IMPURE DATA BASE

                                     0111   367 ;	R11 = ADDRESS OF THE IMAGE

                                     0111   368 ;

                                     0111   369 ; OUTPUTS:

                                     0111   370 ;

                                     0111   371 ;	R0 = STATUS OF THE EXECUTION

                                     0111   372 ;--

                                     0111   373 RSX$INTERNEXIT::			; EXIT THE IMAGE

       0004'CF       FEF7 CF     9E  0111   374 	MOVAB	W^RSX$RETEXIT,W^RSX$A_EXITBLOCK+4; CHANGE EXIT ADDRESS

            59            50     D0  0118   375 	MOVL	R0,R9			; SAVE THE STATUS

                                     011B   376 INTERNEXIT:				;

                                     011B   377 ;

                                     011B   378 ; CLEAN UP THE COMMON EVENT FLAGS

                                     011B   379 ;

                                     011B   380 	$DACEFC_S	#95		;

                                     0128   381 ;

                                     0128   382 ; DEASSIGN RECEIVE MAILBOX

                                     0128   383 ;

                                     0128   384 	$DASSGN_S	I_RCVMAIL(R10)	;

                                     0134   385 ;

                                     0134   386 ; DEASSIGN ALL ASSIGNED DEVICES

                                     0134   387 ;

            57       00B8 CA     9E  0134   388 	MOVAB	I_LOGNAME(R10),R7	; ADDRESS LIST OF LOGICAL NAMES

            58            67     D0  0139   389 	MOVL	(R7),R8			; ADDRESS FIRST ENTRY

                                     013C   390 10$:	$DASSGN_S	LUT_CHAN(R8)	; DEASSIGN THE CHANNEL

            58            68     D0  0147   391 	MOVL	(R8),R8			; GET THE NEXT ENTRY

            57            58     D1  014A   392 	CMPL	R8,R7			; DONE?

                          ED     12  014D   393 	BNEQ	10$			; IF NEQ THEN NO

                                     014F   394 ;

                                     014F   395 ; CLOSE ALL LIBRARIES

                                     014F   396 ;

                                     014F   397  

                                     014F   398 	.IF NDF	C$$ORE

                                     014F   399  

                                     014F   400 	MOVAB	I_ADR0+ADR_SIZE(R10),R8	; ADDRESS LIBRARY ENTRY

                                     014F   401 15$:	MOVL	ADR_FABADDR(R8),R0	; GET FAB ADDRESS

                                     014F   402 	BEQL	20$			; IF EQL THEN DONE

                                     014F   403 	$CLOSE	FAB=R0

                                     014F   404 	ADDL	#ADR_SIZE,R8

                                     014F   405 	BRB	15$			; CONTINUE UNTIL DONE

                                     014F   406  

                                     014F   407 	.ENDC

                                     014F   408  

                                     014F   409 ;

                                     014F   410 ; RETURN TO ORIGIONAL CALLER

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page  11

V03.0           RSX$INTERNEXIT - TERMINATE IMAGE EXECUTION                                                                       (8)



                                     014F   411 ;

            5D       018C CA     D0  014F   412 20$:	MOVL	I_BAILOUTFP(R10),FP	; SET UP ORIGIONAL FP

            50            59     D0  0154   413 	MOVL	R9,R0			; SET UP STATUS

                                 04  0157   414 	RET				; RETURN

                                     0158   415  

                                     0158   416 	.DSABL	LSB

                                     0158   417  

                                     0158   418  

                                     0158   419 ;

                                     0158   420 	.END	

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page  12

SYMBOL TABLE                                                                                                                     (8)



$$MSG          = 00000000            H.HDLN           00000002            IE.IES         = FFFFFFAE            

$$T2           = 00000006            H.IPC            0000000E            IE.IFC         = FFFFFFFE            

...GBL         = 00000000            H.IPS            0000000C            IE.IFU         = FFFFFFE7            

ACBC_CTLRCAST  = 00000002            H.ISP            00000010            IE.ILL         = FFFFFFD6            

ACBC_FLOATAST  = 00000003            H.LUN            0000003E            IE.ISQ         = FFFFFFC3            

ACBC_PWRAST    = 00000000            H.NLUN           0000003C            IE.LCK         = FFFFFFE5            

ACBC_RCVAST    = 00000001            H.NML            00000031            IE.MOD         = FFFFFFEB            

ACBV_INPROG    = 00000001            H.ODVA           00000012            IE.NBF         = FFFFFFD9            

ACBV_PERM      = 00000000            H.ODVL           00000014            IE.NBK         = FFFFFFD7            

ACBV_TYPE      = 00000008            H.OVLY           0000002C            IE.NDR         = FFFFFFB8            

ACB_FLAGS        0000000C            H.PFVA           0000001A            IE.NFI         = FFFFFFC4            

ACB_LINK         00000000            H.RCVA           0000001E            IE.NFW         = FFFFFFBB            

ACB_UPC          0000000A            H.RRVA           00000032            IE.NLK         = FFFFFFB1            

ACB_UPRM         00000008            H.SPRI           00000030            IE.NLN         = FFFFFFDB            

ACCVIO           0000000F R     06   H.TKVA           00000016            IE.NNC         = FFFFFFB3            

ADR_HIGHLIM      00000004            H.TKVL           00000018            IE.NNL         = FFFFFFB2            

ADR_LOWLIM       00000000            H.VEXT           0000002E            IE.NNN         = FFFFFFBC            

ADR_SIZE         00000008            H.WND            00000024            IE.NOD         = FFFFFFE9            

AP_NAME          00000004            IE.2DV         = FFFFFFD0            IE.NSF         = FFFFFFE6            

AST_PARAM        00000004            IE.ABO         = FFFFFFF1            IE.NST         = FFFFFFB0            

AST_PC           00000010            IE.ALC         = FFFFFFAC            IE.OFL         = FFFFFFBF            

AST_PSL          00000014            IE.ALN         = FFFFFFDE            IE.ONP         = FFFFFFFB            

AST_R0           00000008            IE.AST         = FFFFFFB0            IE.OVR         = FFFFFFEE            

AST_R1           0000000C            IE.BAD         = FFFFFFFF            IE.PES         = FFFFFFAD            

BIT...         = 0000000A            IE.BBE         = FFFFFFC8            IE.PRI         = FFFFFFF0            

C$$ORE         = 00000000            IE.BCC         = FFFFFFBE            IE.RAC         = FFFFFFD4            

CAUSE            0000002D R     05   IE.BDI         = FFFFFFCC            IE.RAT         = FFFFFFD3            

CTL$AL_CMCNTX    ********   X   06   IE.BDR         = FFFFFFCE            IE.RBG         = FFFFFFD8            

C_CANONPS      = 83C00000            IE.BDV         = FFFFFFC9            IE.RCN         = FFFFFFD2            

C_RCVDSTR      = 44564352            IE.BHD         = FFFFFFC0            IE.RER         = FFFFFFE0            

FCB_ATTRIBS      0000007C            IE.BLB         = FFFFFFBA            IE.RNM         = FFFFFFCD            

FCB_FIB          0000004C            IE.BLK         = FFFFFFEC            IE.RSU         = FFFFFFEF            

FCB_FID          00000000            IE.BNM         = FFFFFFCA            IE.SNC         = FFFFFFDD            

FCB_FNAME        00000014            IE.BTF         = FFFFFFB4            IE.SPC         = FFFFFFFA            

FCB_FNAMEDESC    0000000C            IE.BTP         = FFFFFFD5            IE.SQC         = FFFFFFDC            

FCB_FNB          00000002            IE.BVR         = FFFFFFC1            IE.SRE         = FFFFFFF2            

FCB_PC           00000078            IE.BYT         = FFFFFFED            IE.STK         = FFFFFFC6            

FCB_RESULT       00000030            IE.CKS         = FFFFFFE2            IE.TMM         = FFFFFFB9            

FCB_RESULTDESC   00000004            IE.CLO         = FFFFFFDA            IE.TMO         = FFFFFFB6            

FCB_SIZE         000000B4            IE.CNR         = FFFFFFB7            IE.ULK         = FFFFFFAB            

FP_AP            00000008            IE.CON         = FFFFFFEA            IE.VER         = FFFFFFFC            

FP_FP            0000000C            IE.DAA         = FFFFFFF8            IE.WAC         = FFFFFFE3            

FP_PC            00000010            IE.DAO         = FFFFFFF3            IE.WAT         = FFFFFFE1            

FP_PSL           00000004            IE.DFU         = FFFFFFE8            IE.WCK         = FFFFFFAA            

FP_REGISTERS     00000014            IE.DNA         = FFFFFFF9            IE.WER         = FFFFFFDF            

GBL...         = 00000000            IE.DNR         = FFFFFFFD            IE.WLK         = FFFFFFF4            

H.CSP            00000000            IE.DUN         = FFFFFFF7            INTERNEXIT       0000011B R     06   

H.CUIC           00000008            IE.DUP         = FFFFFFC7            IO$M_ABORT     = 00000100            

H.DSW            00000026            IE.EOF         = FFFFFFF6            IO$M_ACCESS    = 00000040            

H.DUIC           0000000A            IE.EOT         = FFFFFFC2            IO$M_ATTNAST   = 00000100            

H.EFLM           00000004            IE.EOV         = FFFFFFF5            IO$M_BINARY    = 00000040            

H.EFSV           00000020            IE.EXP         = FFFFFFB5            IO$M_CANCTRLO  = 00000040            

H.FCS            00000028            IE.FEX         = FFFFFFCF            IO$M_COMMOD    = 00000040            

H.FORT           0000002A            IE.FHE         = FFFFFFC5            IO$M_CREATE    = 00000080            

H.FPSA           00000022            IE.FLN         = FFFFFFAF            IO$M_CTRLCAST  = 00000100            

H.FPVA           0000001C            IE.FOP         = FFFFFFCB            IO$M_CTRLYAST  = 00000080            

H.GARD           0000003A            IE.HFU         = FFFFFFE4            IO$M_CVTLOW    = 00000100            

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page  13

SYMBOL TABLE                                                                                                                     (8)



IO$M_DATACHECK = 00004000            IO$V_PACKED    = 00000007            IO$_WRITETRACKD= 0000000F            

IO$M_DELETE    = 00000100            IO$V_PURGE     = 0000000B            IO$_WRITEVBLK  = 00000030            

IO$M_DMOUNT    = 00000400            IO$V_READATTN  = 00000007            IS.BV          = 00000005            

IO$M_DSABLMBX  = 00000400            IO$V_REVERSE   = 00000006            IS.CC          = 00000301            

IO$M_ENABLMBX  = 00000080            IO$V_SHUTDOWN  = 00000007            IS.CR          = 00000D01            

IO$M_FCODE     = 0000003F            IO$V_STARTUP   = 00000006            IS.EOT         = 00000401            

IO$M_HANGUP    = 00000200            IO$V_SYNCH     = 00000009            IS.ESC         = 00001B01            

IO$M_INHERLOG  = 00000800            IO$V_TIMED     = 00000007            IS.ESQ         = 00009B01            

IO$M_INHEXTGAP = 00001000            IO$V_TRMNOECHO = 0000000C            IS.PES         = 00008001            

IO$M_INHRETRY  = 00008000            IO$V_WRTATTN   = 00000008            IS.PND         = 00000000            

IO$M_INHSEEK   = 00001000            IO$_ACCESS     = 00000032            IS.RDD         = 00000002            

IO$M_INTERRUPT = 00000040            IO$_ACPCONTROL = 00000038            IS.SUC         = 00000001            

IO$M_MOUNT     = 00000200            IO$_CREATE     = 00000033            IS.TAB         = 00000901            

IO$M_NOECHO    = 00000040            IO$_DEACCESS   = 00000034            IS.TMO         = 00000002            

IO$M_NOFILTR   = 00000200            IO$_DELETE     = 00000035            I_ADR0           000000D8            

IO$M_NOFORMAT  = 00000100            IO$_DIAGNOSE   = 0000001D            I_ASCIINAME      0000011C            

IO$M_NOW       = 00000040            IO$_DRVCLR     = 00000004            I_ASTPOOL        000000A8            

IO$M_NOWAIT    = 00000080            IO$_ERASETAPE  = 00000006            I_ASTQUEUE       000000A0            

IO$M_PACKED    = 00000080            IO$_LOGICAL    = 0000002F            I_BAILOUTFP      0000018C            

IO$M_PURGE     = 00000800            IO$_MODIFY     = 00000036            I_CMDAD          000000C4            

IO$M_READATTN  = 00000080            IO$_MOUNT      = 00000039            I_CMDSZ          000000C0            

IO$M_REVERSE   = 00000040            IO$_NOP        = 00000000            I_CURAST         00000194            

IO$M_SHUTDOWN  = 00000080            IO$_OFFSET     = 00000006            I_FCBPOOL        000000B0            

IO$M_STARTUP   = 00000040            IO$_PACKACK    = 00000008            I_FCC            000001B0            

IO$M_SYNCH     = 00000200            IO$_PHYSICAL   = 0000001F            I_FLOATA0        000001BC            

IO$M_TIMED     = 00000080            IO$_READHEAD   = 0000000E            I_FLOATA1        000001C4            

IO$M_TRMNOECHO = 00001000            IO$_READLBLK   = 00000021            I_FLOATA2        000001CC            

IO$M_WRTATTN   = 00000100            IO$_READPBLK   = 0000000C            I_FLOATA3        000001D4            

IO$S_FCODE     = 00000006            IO$_READPRESET = 00000019            I_FLOATA4        000001DC            

IO$V_ABORT     = 00000008            IO$_READPROMPT = 00000037            I_FLOATA5        000001E4            

IO$V_ACCESS    = 00000006            IO$_READTRACKD = 00000010            I_FLOATADR       000001AC            

IO$V_ATTNAST   = 00000008            IO$_READVBLK   = 00000031            I_FLOATAST       000001A0            

IO$V_BINARY    = 00000006            IO$_RECAL      = 00000003            I_FLOATCSR       000001A4            

IO$V_CANCTRLO  = 00000006            IO$_RELEASE    = 00000005            I_FLOATERR       000001A8            

IO$V_COMMOD    = 00000006            IO$_RETCENTER  = 00000007            I_FLOATTMP       000001B4            

IO$V_CREATE    = 00000007            IO$_REWIND     = 00000024            I_GARD           000000C8            

IO$V_CTRLCAST  = 00000008            IO$_REWINDOFF  = 00000022            I_HIGHEFN        00000148            

IO$V_CTRLYAST  = 00000007            IO$_SEARCH     = 00000009            I_HIGHSIZE       000000D0            

IO$V_CVTLOW    = 00000008            IO$_SEEK       = 00000002            I_IMAGEVBN       000000D4            

IO$V_DATACHECK = 0000000E            IO$_SENSECHAR  = 0000001B            I_INISIZE        000000CC            

IO$V_DELETE    = 00000008            IO$_SENSEMODE  = 00000027            I_LENGTH         000001EC            

IO$V_DMOUNT    = 0000000A            IO$_SETCHAR    = 0000001A            I_LOGNAME        000000B8            

IO$V_DSABLMBX  = 0000000A            IO$_SETMODE    = 00000023            I_LUT            00000144            

IO$V_ENABLMBX  = 00000007            IO$_SKIPFILE   = 00000025            I_NLUN           00000140            

IO$V_FCODE     = 00000000            IO$_SKIPRECORD = 00000026            I_PC             00000184            

IO$V_HANGUP    = 00000009            IO$_SPACEFILE  = 00000002            I_PROCNAME       00000128            

IO$V_INHERLOG  = 0000000B            IO$_SPACERECORD= 00000009            I_PS             00000188            

IO$V_INHEXTGAP = 0000000C            IO$_STARTSPNDL = 00000019            I_PWRAST         0000019C            

IO$V_INHRETRY  = 0000000F            IO$_UNLOAD     = 00000001            I_R0             00000164            

IO$V_INHSEEK   = 0000000C            IO$_VIRTUAL    = 0000003F            I_R1             00000168            

IO$V_INTERRUPT = 00000006            IO$_WRITECHECK = 0000000A            I_R2             0000016C            

IO$V_MOUNT     = 00000009            IO$_WRITECHECKH= 00000018            I_R3             00000170            

IO$V_NOECHO    = 00000006            IO$_WRITEHEAD  = 0000000D            I_R4             00000174            

IO$V_NOFILTR   = 00000009            IO$_WRITELBLK  = 00000020            I_R5             00000178            

IO$V_NOFORMAT  = 00000008            IO$_WRITEMARK  = 0000001C            I_R6             0000017C            

IO$V_NOW       = 00000006            IO$_WRITEOF    = 00000028            I_RAD50NAME      00000124            

IO$V_NOWAIT    = 00000007            IO$_WRITEPBLK  = 0000000B            I_RCVAST         00000198            

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page  14

SYMBOL TABLE                                                                                                                     (8)



I_RCVMAIL        0000013C            PCM              0000005E R     05   RSX$_NOSUCHDEV = 000680C2            

I_RUNFLAGS       00000190            PSL_CC         = 00000000            RSX$_NOTSKIMG  = 00068064            

I_SCRATCH        00000000            PSL_CM         = 0000001F            RSX$_ODDADDR   = 00068034            

I_STATE          0000014C            PSL_FPD        = 0000001B            RSX$_PMD       = 000680CA            

I_TYPE           00000180            PSL_FU         = 00000006            RSX$_RCVMBXSIZ = 0000012C            

I_UIC            00000118            PSL_TBIT       = 00000004            RSX$_RESERVED  = 00068004            

I_WAIT           00000154            PSM              00000062 R     05   RSX$_TBIT      = 0006803C            

I_WAITSAVE       0000015C            QIOV_FILES     = 00000000            RSX$_TRAP      = 00068024            

L$BASG           00000200            QIO_FLAGS        0000001C            SPM              0000007E R     05   

L$BBLK           000000F0            QIO_FUNCTION     0000001A            SS$_NORMAL       ********   X   06   

L$BDAT           0000001A            QIO_IOSB         0000000E            SV_ASTLVL        00000005            

L$BEXT           000000EA            QIO_LUT          00000016            SV_DCL           00000002            

L$BFLG           00000018            QIO_SECONDBLK    0000001E            SV_FLOATAST      0000000A            

L$BHGV           0000000A            QIO_SIZE         00000022            SV_FRESTORE      00000003            

L$BHRB           000000EE            R$LDAT           00000016            SV_NOAST         00000004            

L$BLDZ           0000000E            R$LFLG           00000014            SV_PENDWAIT      00000006            

L$BLIB           00000020            R$LHGV           00000006            SV_PWRAST        00000009            

L$BLUN           000000F2            R$LLDZ           0000000A            SV_RCVAST        00000008            

L$BMXV           0000000C            R$LMXV           00000008            SV_RESTORE       00000000            

L$BMXZ           00000010            R$LMXZ           0000000C            SV_TRANSLATE     00000001            

L$BOFF           00000012            R$LNAM           00000000            SV_WAIT          00000007            

L$BPAR           00000004            R$LOFF           0000000E            SYS$DACEFC       ********   X   06   

L$BPRI           000000E6            R$LSA            00000004            SYS$DASSGN       ********   X   06   

L$BSA            00000008            R$LSEG           00000012            SYS$EXIT         ********   X   06   

L$BSEG           00000016            R$LSIZ           0000001C            SYS$FAO          ********   X   06   

L$BSGL           000000EC            R$LWND           00000010            SYS$QIOW         ********   X   06   

L$BTSK           00000000            R0M              00000066 R     05   S_PC             00000020            

L$BWND           00000014            R1M              0000006A R     05   S_PS             00000024            

L$BXFR           000000E8            R2M              0000006E R     05   S_R0             00000000            

LD$ACC         = FFFF8000            R3M              00000072 R     05   S_R1             00000004            

LD$REL         = 00000004            R4M              00000076 R     05   S_R2             00000008            

LD$RSV         = 00004000            R5M              0000007A R     05   S_R3             0000000C            

LUTC_CR        = 00000005            REGM             0000003B R     05   S_R4             00000010            

LUTC_DISK      = 00000002            RSX$ABORT        00000018 RG    06   S_R5             00000014            

LUTC_LP        = 00000004            RSX$A_EXITBLOCK  ********   X   06   S_R6             00000018            

LUTC_RMS       = 00000000            RSX$A_IMPURE     ********   X   06   S_TYPE           0000001C            

LUTC_TAPE      = 00000003            RSX$A_TIODEV     ********   X   06   TS$ACP         = 00002000            

LUTC_TRM       = 00000001            RSX$C_SUBSYSTEM= 00000006            TS$CHK         = 00000040            

LUTV_CTRLC     = 00000002            RSX$EXIT         0000010B RG    06   TS$CMP         = 00000080            

LUTV_CTRLO     = 00000000            RSX$EXST         00000106 RG    06   TS$NET         = 00000200            

LUTV_PRM       = 00000003            RSX$FORCEEXIT    00000000 RG    06   TS$NHD         = 00004000            

LUTV_TI        = 00000001            RSX$GETMSG       ********   X   06   TS$NSD         = 00000400            

LUT_CHAN         0000000C            RSX$INTERNEXIT   00000111 RG    06   TS$PIC         = FFFF8000            

LUT_CHAR         00000014            RSX$PRINTERR     000000D7 RG    06   TS$PMD         = 00001000            

LUT_CTRLC        00000034            RSX$RETEXIT      0000000C RG    06   TS$PRV         = 00000100            

LUT_FLAGS        0000000A            RSX$_ACCVIO    = 00068044            TS$RES         = 00000020            

LUT_INFONAME     00000030            RSX$_BADLIBREF = 0006806C            TS$SLV         = 00000800            

LUT_INFOUNIT     00000032            RSX$_BADSTACK  = 0006804C            W.BATT           00000006            

LUT_LINK         00000000            RSX$_BREAK     = 0006800C            W.BFPD           0000000C            

LUT_REALNAME     00000020            RSX$_EXITSTATUS= 00068180            W.BHVR           00000004            

LUT_REF          00000008            RSX$_EXTERNABRT= 0006805C            W.BLGH           00000010            

LUT_RSXNAME      00000010            RSX$_ILLINST   = 0006802C            W.BLPD           0000000E            

LUT_RSXUNIT      00000012            RSX$_INSFDYNMEM= 00068054            W.BLVR           00000002            

LUT_SIZE         00000038            RSX$_IOT       = 00068014            W.BNPD           0000000D            

LUT_TYPE         00000018            RSX$_LIBNOTFND = 00068074            W.BOFF           0000000A            

LUT_UNIT         00000020            RSX$_LOADERROR = 0006807C            W.BPCB           00000000            

NAMEDABORT       00000000 R     05   RSX$_NONRSXEMT = 0006801C            W.BSIZ           00000008            

RSXTERMIN       - IMAGE EXIT,TERMINATION AND ABORT ROUTINES      22-AUG-1978 00:31:33   VAX-11 MACRO X0.3-11               Page  15

PROGRAM SECTION SYNOPSIS                                                                                                         (8)







PROGRAM SECTION SYNOPSIS



.  ABS  .        00000000      00     NOPIC   USR   CON   ABS   LCL NOSHR NOEXE NORD  NOWRT BYTE  

. BLANK .        00000000      01     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  

..ABS.           00000200      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

$ABS$            00000000      03     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

RSXDEF           000001F0      04     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

RSXPURE          00000082      05     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD  NOWRT LONG  

RSXCODE          00000158      06     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

9962. BYTES LEFT IN FREE MEMORY POOL.

2200. BYTES OF RECLAIMED MEMORY.

OBJ$:RSXTERMIN,LIS$:RSXTERMIN/-SP=SRC$:C,RSXTERMIN

34 MLB DIR RDS - 695 GETS TO DEFINE 24 MACROS. 34 INTER. FILE WRITES. 

