Changeset 58 for trunk/Target


Ignore:
Timestamp:
Apr 26, 2014, 10:20:38 AM (11 years ago)
Author:
chronos
Message:
  • Fixed: Wrong occurence limit checking.
File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/Target/UTarget.pas

    r53 r58  
    507507  Result := 1;
    508508  if Optimization = coNormal then
    509   while ((FProgramIndex + 1) <= Length(FProgram)) and (FProgram[FProgramIndex + 1] = C) do begin
     509  while ((FProgramIndex + 1) < Length(FProgram)) and (FProgram[FProgramIndex + 1] = C) do begin
    510510    Inc(Result);
    511511    Inc(FProgramIndex);
Note: See TracChangeset for help on using the changeset viewer.