-- SMCommentTable.mesa, definitions for the comment table
-- last edit by Satterthwaite, April 28, 1983 4:50 pm
-- last edit by Schmidt, May 3, 1982 3:33 pm

DIRECTORY
  Rope: TYPE USING [Text];
  
SMCommentTable: CEDAR DEFINITIONS~{

  Index: TYPE~INT;
  	
  Text: TYPE~Rope.Text;
  	
  Ref: TYPE~REF Node;
  Node: TYPE~RECORD[start: INT, text: Rope.Text, lastToken, prefix: INT];

  Table: TYPE~REF TableNode;
  TableNode: TYPE~RECORD[
    last: Ref,
    size: NAT, 
    lastx: NAT,
    data: SEQUENCE max: NAT OF Ref];

  BreakTab: TYPE~REF BreakSequence;
  BreakSequence: TYPE~RECORD [
    size: NAT,
    indexes: SEQUENCE max: NAT OF INT];

  }.