; PATH1.MAC ; NAB/SLA/1736 07-DEC-78/28-FEB-79 ; RT-11 SOFTWARE DISPATCH FEBRUARY 1979 (1978) ; BASIC-11/RT-11 V2 SEQ 24 M (SEQ) ; THIS IS PATCH H. ; THIS PATCH FIXES A NEW/SAVE PROBLEM. .TITLE BSE1 .ENABL GBL .PSECT BASECD,RO,I .=.+30174-26772+144 JSR PC ,PATH1 NOP .PSECT PATH1,RO,I PATH1: CMPB (R3)+ ,#15 BEQ 4$ CMPB -1(R3) ,#40 BGT 3$ INC R0 BR PATH1 3$: CMPB (R3)+ ,#15 BNE 3$ 4$: RTS PC .END