paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-29 16:40:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

* remove unsupported syntax

Browse Source
This commit is contained in:
peter 2004-05-24 15:31:44 +00:00
parent a966964657
commit 6ecc535b18
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tests/webtbs/tw2536.pp
View File

@ -12,8 +12,8 @@ var
// Delphi accepts this. // Delphi accepts this.
WSAStartup: function(wVersionRequired: Word; var WSData: TWSAData): Integer stdcall = nil; WSAStartup: function(wVersionRequired: Word; var WSData: TWSAData): Integer stdcall = nil;
// FPC accepts this. // FPC should accept this too
WSAStartup2: function(wVersionRequired: Word; var WSData: TWSAData): Integer = nil; stdcall; WSAStartup2: function(wVersionRequired: Word; var WSData: TWSAData): Integer;stdcall = nil;
implementation implementation