inlining inherited does not compile
Original Reporter info from Mantis: BeniBela @benibela
-
Reporter name: Benito van der Zander
Original Reporter info from Mantis: BeniBela @benibela
- Reporter name: Benito van der Zander
Description:
The following program does not compile:
program Project1;
{$mode objfpc}{$H+}
type
TA = class
procedure foobar;
end;
TB = class(TA)
procedure callfoobar; inline;
end;
procedure TA.foobar;
begin
end;
procedure TB.callfoobar;
begin
inherited foobar;
end;
var a: TB;
begin
a := TB.create;
a.callfoobar;
end.
Error: "project1.lpr(35,3) Error: Illegal expression"
at a.callfoobar
If I remove either the inline or the inherited modifier it works.
Mantis conversion info:
- Mantis ID: 21719
- Build: 2.6.0-2 [2012/04/01] for x86_64
- Version: 2.6.0