--- a/hedgewars/uMisc.pas	Sat Jan 09 00:59:12 2010 +0000
+++ b/hedgewars/uMisc.pas	Sat Jan 09 01:34:23 2010 +0000
@@ -27,7 +27,12 @@
 {$ELSE}
 	GL,
 {$ENDIF}
-	uFloat;
+	uFloat
+{$IFDEF IPHONEOS}
+	, PascalExports
+{$ENDIF}
+	;
+
 var
 	isCursorVisible : boolean = false;
 	isTerminated    : boolean = false;
@@ -585,7 +590,7 @@
 begin
 	assign(f, 
 {$IFDEF IPHONEOS}
-	string(get_documents_path())
+	string(IPH_getDocumentsPath())
 {$ELSE}
 	ParamStr(1)
 {$ENDIF}