INLINE class method not compile
Original Reporter info from Mantis: barlone @barloneD
-
Reporter name:
Original Reporter info from Mantis: barlone @barloneD
- Reporter name:
Description:
code below not compiled, what wrong?
program test1;
{$mode delphi}
uses classes;
type
TIntList = class(TList)
function Add(Value: Integer): Integer;
end;
function TIntList.Add(Value: Integer): Integer; inline;
begin
Result := inherited Add(Pointer(Value));
end; // TIntList.Add
var L: TIntList;
begin
L:=TIntList.Create;
L.Add(10);
// ^ bug1.pas(19,3) Error: Illegal expression
L.Free;
end.
Mantis conversion info:
- Mantis ID: 18984
- Build: 2011/03/01 for i386
- Platform: Windows
- Version: 2.5.1