(GIN Macro)
Defined in: COREMACROS
Used in:
7MBN ...[??? CXMEND SECT CENT FGN 32 DOC 7MLG # 7N66 # THE FOLLOWING CX MACROS PROVIDE A RESTORE TIME CHECKING FACILITY 7NKQ #MAC CXMEND 7P5B #OPT FC50A=0 7PK2 #SKI FC50A<1-1 [IF FIRST CXMEND,FOLLOWING CODE COMPILES 7Q4L ( 7QJ= #STR DELAY,%A 7R3W #SKI 7RHG ( 7S36 RESOFF CHECK 7SGQ ) 7T2B #MEN CHCH 7TG2 #TRA FZCO 7T^L BRN JFCT [FCMEND STARTING LABEL 7WF= #END 7WYW FCMEND 7XDG BSOFF CHECK,FC50B 7XY6 ) 7YCQ [ SUBSEQUENT CXMENDS MUST NOT HAVE 'DELAY' PARAM, AND CANNOT HAVE MORE 7YXB [ THAN ONE CXMEND IF FIRST HAD 'DELAY' PARAM. 7^C2 #SKI FC50A 7^WL ( 82B= #STR DELAY,%A 82TW #SKI 83*G ( 83T6 ! DELAY PARAMETER NOT ALLOWED 84#Q #CON ERROR IN CXMEND DELAY 84SB #MEN CEND 85#2 #TRA FC50A 85RL BRN FC50B 86?= #END 86QW FCMEND 87=G #EXIT 87Q6 ) 889Q #SKI 88PB ( 8992 ! DELAY PARAMETER USED PREVIOUSLY 89NL #CON ERROR IN CXMEND 8=8= #MEN CEND 8=MW #TRA FC50A 8?7G BRN FC50B 8?M6 #END 8#6Q FCMEND 8#LB #EXIT 8*62 ) 8*KL #MEN CEND [IF NOT FIRST CXMEND, THIS CODE COMPILES 8B5= #TRA FC50A 8BJW BRN JFCT [FCMEND STARTING LABEL 8C4G #END 8CJ6 FCMEND 8D3Q ) 8DHB #SKI FNOISE 8F32 ( 8FGL #STR SELECT,%B 8G2= #SKI 8GFW ( 8G^G SMO FX2 8HF6 LDX 1 ALINK1 8HYQ BPZ 1 FC50B 8JDB ANDX 1 BITS22LS 8JY2 JBC FC50B,BACK2(1),CXSELECT 8KCL ) 8KX= ) 8LBW #NOR