Bladeren bron

* remove unsupported syntax

peter 21 jaren geleden
bovenliggende
commit
6ecc535b18
1 gewijzigde bestanden met toevoegingen van 2 en 2 verwijderingen
  1. 2 2
      tests/webtbs/tw2536.pp

+ 2 - 2
tests/webtbs/tw2536.pp

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