; ; INITIALIZATION TO QUOTE ERROR SEARCH ; .MACRO QT$ERR FNAM,?L1,?L2,?L3 MOV #L1,R2 CALL .QTERR BR L3 L1: .WORD L2-L1-2 .ASCII /FNAM/ L2: .EVEN L3: .ENDM