--- a/hedgewars/uConsole.pas	Thu Aug 10 22:19:35 2006 +0000
+++ b/hedgewars/uConsole.pas	Fri Aug 11 16:17:50 2006 +0000
@@ -163,7 +163,7 @@
 end;
 
 procedure ParseCommand(CmdStr: shortstring);
-type PReal = ^real;
+type PReal = ^Double;
 var i, ii: integer;
     s: shortstring;
     t: PVariable;