; PATC1.MAC NAB/1738/SNL 31-OCT-78/25-AUG-80. ; RT-11 SOFTWARE DISPATCH MARCH 1980 (FEBRUARY 1979) (JULY 1978). ; BASIC-11/RT-11 V2 SEQ 35.1.4 M (SEQ 19 M) (SEQ 5 M). ; EDITING A DIM #N STATEMENT - PATCH C. .TITLE BSE0 .IDENT \000005\ .ENABL GBL .PSECT BASECD,RO,I .=.+26362-21072+74 JSR PC ,PATC1 .PSECT PATC1,RO,I PATC1: BICB #.VARY ,-4(R0) BISB #.ARY ,-4(R0) ADD #6 ,R0 RTS PC .END