"Continue" not work properly in except clause on win64 (x86_64)
Original Reporter info from Mantis: Toru Takubo
-
Reporter name: Toru Takubo
Original Reporter info from Mantis: Toru Takubo
- Reporter name: Toru Takubo
Description:
I'm trying FPC 3.0.0-rc1 and find "Continue" does not work properly
in except clause but just jump to finally clause on win64.
Steps to reproduce:
Here is a code to reproduce:
----------------------------
program sample;
{$mode objfpc}
uses
SysUtils;
var
i: Integer;
begin
try
for i:=0 to 2 do begin
try
Writeln(IntToStr(i));
raise Exception.Create('');
except
Continue;
end;
end;
finally
Writeln('done.');
Readln;
end;
end.
----------------------------
The result on win32 (i386):
----------------------------
0
1
2
done.
----------------------------
The result on win64 (x86_64)
----------------------------
0
done.
----------------------------