{$implicitExceptions off} doesn't turn off implicit exceptions.
Original Reporter info from Mantis: helbig
-
Reporter name: Wolfgang Helbig
Original Reporter info from Mantis: helbig
- Reporter name: Wolfgang Helbig
Description:
To witniss compile this program:
{$MODE ISO}
{$implicitExceptions off}
{$Q+}
{$R+}
program gt;
label 1;
procedure jump;
var
a: integer;
b: rawbytestring;
begin
b := 'nanu';
writeln('nanu');
goto 1;
end;
begin
jump;
writeln('not jumped!');
1:
writeln('jumped!');
end.
FPC says:
Error: Leaving procedures containing explicit or implicit exceptions frames using goto is not allowed
Mantis conversion info:
- Mantis ID: 37823
- OS: os x
- OS Build: 10.11
- Platform: imac
- Version: 3.2.0
- Fixed in version: 3.3.1
- Fixed in revision: 46974 (#e1536bdf)
- Monitored by: » helbig (Wolfgang Helbig)