*COMDECK  CFTBLD
 CFTBLD   CTEXT  CFTBLD - CONTROL FLOW TABLE DEFINITIONS
  
**        CF. - CONTROL FLOW TABLE FORMAT 
  
          DESCRIBE CF.,60 
 JP       DEFINE 1
          DEFINE 11 
 FROM     DEFINE 18          BLOCK NUMBER OF PRED 
          DEFINE 12 
 TO       DEFINE 18          BLOCK NUMBER OF SUCC 
 GST      SPACE  3
**        THE GRAPH STRUCTURE TABLES CONSIST OF ( FOR EACH GRAPH ) -
*         GA, GB WORDS, THE EDGE INDEX TABLE, THE EDGE TABLE, AND 
*         INTERVAL LISTS, WHICH ARE TERMINATED BY A ZERO WORD.
  
**        GRAPH HEADER WORDS
  
          DESCRIBE GA.,60 
          DEFINE 24 
 LB       DEFINE 18          LINK BACKWARDS ( LENGTH OF LAST GRAPH )
 LF       DEFINE 18          LINK FOWARD ( LENGTH OF THIS GRAPH ) 
  
          DESCRIBE GB.,60 
          DEFINE 6
 NLP      DEFINE 18          N.LOOPS
 NB       DEFINE 18          N.BLOCKS IN GRAPH
 ILI      DEFINE 18          INTERVAL LIST INDEX ( REL TO *EII* ) 
 EIT      SPACE  2,10 
**        EI. - EDGE INDEX TABLE
  
          DESCRIBE EI.,60 
 PRI      DEFINE 18          PREDECESSOR INDEX  ( REL TO EIB )
 NP       DEFINE 12          N.PRED ( PACKED )
 SUI      DEFINE 18          SUCCESSOR INDEX
 NS       DEFINE 12          N.SUCC ( PACKED )
 EIT      SPACE  2,10 
**        ET. - EDGE TABLE FORMAT 
  
          DESCRIBE ET.,60 
 JP       DEFINE 1           JUMP EDGE ( SUCCESSOR EDGES )
          DEFINE 11 
 PRED     DEFINE 18          BLOCK NUMBER OF PRED 
          DEFINE 12 
 SUCC     DEFINE 18          BLOCK NUMBER OF SUCCESSOR
 IP       SPACE  3,14 
**        IP. - INTERVAL PROPERTIES 
  
          DESCRIBE IP.,60 
 GL       DEFINE 1           SET IF REGION NEEDS A *GL* WHEN OPTIMIZED
 FT       DEFINE 1           FALL THROUGH TO HEADER NODE
          DEFINE 4
 NIP      DEFINE 18          N. INTERNAL PRED OF HEADER NODE
 PB       DEFINE 18          BLOCK NUMBER OF PROLOGUE BLOCK ( *SCR* " 0 
 NODE     DEFINE 18          NUMBER OF NODES IN INTERVAL
 IM       SPACE  2
**        IM. - INTERVAL MEMBER PROPERTIES
  
          DESCRIBE IM.,60 
 SCR      DEFINE 1           IN STRONGLY CONNECTED REGION 
 AP       DEFINE 1           ARTICULATION POINT 
 LN       DEFINE 1           LATCHING NODE ( JUMPS BACK TO LOOP HEADER )
 DOM      DEFINE 1           NODE IS A DOMINATOR
 EN       DEFINE 1           INTERVAL EXIT NODE 
 HN       DEFINE 1           HEADER NODE
 BI       DEFINE 18          INDEX TO BLOCK INFO IN *BIT* 
 IBD      DEFINE 18          IMMEDIATE BACK DOMINATOR ( REL TO *HN* ) 
 BN       DEFINE 18          NODE NUMBER OF BLOCK 
  
 APLN     DEQU   LN,2        AP AND LN BITS 
  
          ENDX
