.TITLE TASK TERMINATION NOTIFICATION .IDENT -V06.01- ; ; THIS FILE IS USED TO GENERATE AN OBJECT FILE PATCH FOR ; RSX-11D V6.2 OR IAS V3.0 .TKTN OBJECT MODULE FOR THE ; CORE DUMP SUBROUTINES. ; ; Select a system from the following options: ; ; 0 - RSX-11D V6.2 or IAS V2.2 or earlier ; 1 - IAS V3.0 ; 2 - IAS V3.1 ; S$$STM = 2 ; IAS V3.1 ; .GLOBL DMPINI ;SUBROUTINE TO INIT DUMP ROUTINE. .GLOBL DMPCOR ;SUBROUTINE TO DUMP CORE. .GLOBL PS.EXP ;PSW ADDRESS IN EXTERNAL PAGE. .GLOBL TYPREG ;A SUBROUTINE IN .TKTN. TO BE CALLED. ; BEG: JSR PC,DMPINI ;INIT DUMP SUBR. .if eq s$$stm ; If on RSX-11D ... . = beg+442 jsr pc,dmpcor . = beg+570 typreg = . .endc ; .if eq s$$stm-1 ; If on IAS V3.0 ... . = beg+442 jsr pc,dmpcor . = beg+574 typreg = . .endc ;i$$v30 ; .if eq s$$stm-2 ; If on IAS V3.1 ... . = beg+566 jsr pc,dmpcor . = beg+720 typreg = . .END