--- a/hedgewars/PascalExports.pas	Tue Dec 21 23:22:53 2010 +0100
+++ b/hedgewars/PascalExports.pas	Wed Dec 22 03:05:28 2010 +0100
@@ -25,7 +25,6 @@
      uCommands;
 
 {$INCLUDE "config.inc"}
-var dummy: boolean;  // avoid compiler hint
 
 implementation
 {$IFDEF HWLIBRARY}
@@ -33,7 +32,7 @@
     previousGameState: TGameState;
 
 // retrieve protocol information
-procedure HW_versionInfo(netProto: PShortInt; versionStr: PPChar); cdecl; export;
+procedure HW_versionInfo(netProto: PLongInt; versionStr: PPChar); cdecl; export;
 begin
     netProto^:= cNetProtoVersion;
     versionStr^:= cVersionString;