mORMot Open Source

HollosCs

Member

Registered: 2015-12-08

Posts: 56

Compile error in SynCommon.pas

Latest build (Delphi 10.3.3): [dcc32 Error] SynCommons.pas(60010): E2125 EXCEPT or FINALLY expected

function TRawUTF8List.IndexOfObject(aObject: TObject): PtrInt;
begin
  if (self<>nil) and (fObjects<>nil) then begin
    fSafe.Lock;
    try
      result := PtrUIntScanIndex(pointer(fObjects),fCount,PtrUInt(aObject)) else   <---error [dcc32 Error] SynCommons.pas(60010): E2125 EXCEPT or FINALLY expected
        result := -1;
    finally
      fSafe.UnLock;
    end;
  end;
end;

ab

Administrator

From: France

Registered: 2010-06-21

Posts: 14,673

Website

Re: Compile error in SynCommon.pas

Yes, some keyboard typo just before commit!

Please check https://synopse.info/fossil/info/ba1a1803d4

urhen

Member

Registered: 2020-02-13

Posts: 36

Re: Compile error in SynCommon.pas

Now it misses a ';' for the end for the try-finally block.

HollosCs

Member

Registered: 2015-12-08

Posts: 56

Re: Compile error in SynCommon.pas

Many thanks! Great work and support!