anchor.diff:         end;
         end;
        end;
  -     opINTERNALSAVE:begin
  -      Instruction:=Instruction^.Next;
  -      if ShouldVisit(Instruction,Position) then begin
  -       continue;
  -      end;
  -     end;
        opBOL:begin
         if Satisfy(sfEmptyBeginLine,Position) then begin
          Instruction:=Instruction^.Next;
  
positive.code: 
         CountSubMatches:longint;
  
         CountInternalSubMatches:longint;
  
         ForwardInstructions:TFLREInstructions;
         CountForwardInstructions:longint;
  
  
negative.code:            end else begin
              raise EFLRE.Create('Syntax error');
             end;
             Value:=CountInternalCaptures;
             inc(CountInternalCaptures);
             inc(CountCaptures);
             NamedGroupStringIntegerPairHashMap.Add(Name,Value);
             if NamedGroupStringList.IndexOf(Name)<0 then begin
  