--- a/hedgewars/PascalExports.pas Fri Feb 12 18:40:14 2010 +0000
+++ b/hedgewars/PascalExports.pas Sat Feb 13 01:56:35 2010 +0000
@@ -21,7 +21,9 @@
// called by pascal code, they deal with the objc code
function IPH_getDocumentsPath: PChar; cdecl; external;
procedure IPH_showControls; cdecl; external;
+{$ENDIF}
+{$IFDEF HWLIBRARY}
// retrieve protocol information
procedure HW_versionInfo(netProto: PShortInt; versionStr: PString); cdecl; export;
@@ -45,7 +47,7 @@
implementation
-{$IFDEF IPHONEOS}
+{$IFDEF HWLIBRARY}
procedure HW_versionInfo(netProto: PShortInt; versionStr: PString); cdecl; export;
begin
if netProto <> nil then netProto^:= cNetProtoVersion;