paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-15 17:19:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

* new bugs

Browse Source
This commit is contained in:
peter 2003-10-07 20:36:57 +00:00
parent b7cf110884
commit 4c9c767687
2 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tests/webtbf/tw2721.pp
View File

@ -13,9 +13,17 @@ type
t2 = class(Tintfpersistent)
public
// Different calling convention
function _Release: Integer; override; stdcall;
end;
function TIntfPersistent._Release: Integer;
begin
end;
function t2._Release: Integer;
begin
end;
begin
end.

8
tests/webtbs/tw2721.pp
View File

@ -14,6 +14,14 @@ type
function _Release: Integer; override;
end;
function TIntfPersistent._Release: Integer;
begin
end;
function t2._Release: Integer;
begin
end;
begin
end.