22FL    #   
 22^=    #   
 23DW    #   
 23YG    #     MACROS SHFSA IS FOR SHARED FILESTORE CODE GENERATION AND  
 24D6    #                         TESTING MACROS.   
 24XQ    #     IT CONTAINS THE FOLLOWING MACROS: 
 25CB    #   
 25X2    #   
 26BL    [???  FSHCODE SECT FILE FGN 1 DOC   
 26W=    #   
 27*W    [???  FSHCOMPS SECT FILE FGN 1 DOC  
 27TG    #   
 28*6    [???  FSHSKIP SECT FILE FGN 1 DOC   
 28SQ    #   
 29#B    [???  CHAINSWOP SECT FILE FGN 1 DOC 
 29S2    #   
 2=?L    [???  FSHTEST SECT FILE FGN 1 DOC   
 2=R=    #   
 2?=W    [???  FSHENTRY SECT FILE FGN 1 DOC  
 2?QG    #   
 2#=6    #   
 2#PQ    #   
 2*9B    #   
 2*P2    #   
 2B8L    [???  FSHCODE SECT FILE FGN 1 DOC   
 2BN=    #MAC  FSHCODE   
 2C7W    #OPT  FSHA=0
 2CMG    #OPT  FSHB=0
 2D76    #OPT  FSHAORB=FSHA^FSHB 
 2DLQ    #STR  %A,A  
 2F6B    #SKI
 2FL2    (   
 2G5L    #DEF  MFSHCODEA=1   
 2GK=    #UNS  FSHA  
 2H4W    (   
 2HJG    #UNS  FSHB  
 2J46          JBS      %B,,BFSHB
 2JHQ    )   
 2K3B    )   
 2KH2    #STR  %A,B  
 2L2L    #SKI
 2LG=    (   
 2L^W    #DEF  MFSHCODEB=1   
 2MFG    #UNS  FSHB  
 2M^6    (   
 2NDQ    #UNS  FSHA  
 2NYB          JBC      %B,,BFSHB
 2PD2    )   
 2PXL    )   
 2QC=    #STR  AORB,%A   
 2QWW    #SKI
 2RBG    #DEF  MFSHCDEAORB=1 
 2RW6    #OPT  MFSHCDEAORB=0 
 2S*Q    #OPT  MFSHCODEA=0   
 2STB    #OPT  MFSHCODEB=0   
 2T*2    #UNS  MFSHCODEA^MFSHCODEB^MFSHCDEAORB   
 2TSL    #SKI
 2W#=    !     PARAMETER A NOT 'A', 'B' OR 'AORB'
 2WRW    #FRE  MFSHCODEA,MFSHCODEB,MFSHCDEAORB   
 2X?G    #UNS  FSH%A 
 2XR6    #NOR