.title rsx rsx header file ; ; Version of 10-Feb-82 ; RSX = 1 ;Assemble for RSX C$$SXT = 1 ;Assume SXT instruction ;Note: set C$$SXT = 0 for 11/04, 11/05, ; 11/20 and 11/40 without EIS. C$$EIS = C$$SXT ;Assume inline EIS if C$$SXT. This ; may be overridden at compile time. C$$FLT = 0 ;Assume double precision N$$FIL = 8. ;For the RSX run-time library, ;Default to 8 simultaneously open files. ;Note: change this to allocate block buffers. C$PMTR = 4 ;Locally define C$PMTR and C$AUTO C$AUTO = -6 ;To minimize global symbol references .IIF NDF L$$IST .NLIST .IIF NDF L$$IST .DSABL CRF .IIF NDF C$$SXT C$$SXT = 0 ; No SXT .IIF NDF C$$EIS C$$EIS = 0 ; No EIS .MACRO CALL ARG1,ARG2 .IF B ARG2 JSR PC,ARG1 .IFF JSR ARG1,ARG2 .ENDC .ENDM CALL .MACRO CALLR ARG1 JMP ARG1 .ENDM .MACRO RETURN ARG1 .IF B ARG1 RTS PC .IFF RTS ARG1 .ENDC .ENDM RETURN ; ; This macro defines the crash instruction ; .MACRO CRASH .LIST BPT .NLIST .ENDM CRASH .ENABL LC, GBL .NLIST CND, BEX .IIF NDF L$$IST .ENABL CRF .IIF NDF L$$IST .LIST