anchor.diff:    PParseNode = ^RParseNode;
     RParseNode = record
       point: PGmrNode;
  +    nonTermNum: cardinal;
       line: cardinal;
       data: array of string;
       children: array of PParseNode;
  
positive.code:               partial := true;
                Node := new(PParseNode);
                Node.point := inNode;
                setLength(Node.data, dumbAtom.re.captureLength);
                for i := 0 to length(Node.data)-1 do
                  Node.data[i] := dumbAtom.re.capture[i].captured;
                setLength(Node.children, 0);
              end;
            end;
  
negative.code:               begin {That option was a winner}
                  matched := true;
                  parsedLen := parsedLen + i;
                  Node.nonTermNum := nonTermI;
                  break;
  
                  {
  