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

* new bug

Browse Source
This commit is contained in:
peter 2004-01-31 14:51:30 +00:00
parent 2b02238e4a
commit f630197582
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
tests/webtbs/tw2927.pp Normal file
View File

@ -0,0 +1,19 @@
{$mode objfpc}
uses
Classes;
procedure ReadTest(const p: Pointer); overload;
begin
end;
procedure ReadTest(const p: TStream); overload;
begin
end;
var
f: TFileStream;
begin
ReadTest(f);
end.