anchor.diff:     end;
     end;
    end;
  +{$endif}
   
    Position:=UntilExcludingPosition-1;
   
  
positive.code:      jnz @HaveNextState
  
       mov dword ptr result,DFAError
  
      @Done:
  
     popad
  
  
negative.code:      test ebx,sfDFADead
       jz @IsNotDFADead
        cmp dword ptr result,DFAMatch
        jz @DoneMatch
         mov dword ptr result,DFAFail
        @DoneMatch: 
        popad
        jmp ExitFunction
       @IsNotDFADead:
       test ebx,sfDFAMatchWins
       jz @IsNotMatchWin
        push ebx
        lea eax,[esi-2]
        sub eax,dword ptr LocalInput
        mov ebx,dword ptr MatchEnd
        mov dword ptr [ebx],eax
        mov dword ptr result,DFAMatch
        pop ebx
       @IsNotMatchWin:
       test ebx,sfDFAStart
       jz @IsNotStartState
         sub esi,dword ptr LocalInput
         mov dword ptr Position,esi
         popad
        jmp ProcessNewStartState
       @IsNotStartState:
       jmp @BackToLoop
  
  