.TITLE DIRGDF - DIR$G MACRO DEFINITION .IDENT /010285/ ;+ ;***** ; ; DIR$G defines a special form of the DIR$ macro to call subroutines ; rather than issue an EMT instruction when executing the GCCI$ ; or RPOI$ functions under RSX-11M V3.x/M+ V1.x. Used in the same ; manner as RSX's "DIR$" macro to execute a function: ; ; label: RPOI$... ; Define parameter block ; . ; . ; DIR$G #label ; Execute function ; ;***** ;- .MACRO DIR$G ADR MOV R5,-(SP) ; FREE R5 MOV ADR,R5 ; POINT TO PARAMETER BLOCK JSR PC,@2(R5) ; CALL ROUTINE SPECIFIED MOV (SP)+,R5 ; RESTORE R5 .ENDM ;DIR$G ;