--- a/hedgewars/uMisc.pas	Sat Mar 27 17:03:27 2010 +0000
+++ b/hedgewars/uMisc.pas	Sat Mar 27 17:22:33 2010 +0000
@@ -128,8 +128,8 @@
     TextureList : PTexture;
 
     ScreenFade : TScreenFade;
-    ScreenFadeValue : Longword;
-    ScreenFadeSpeed : Longword;
+    ScreenFadeValue : LongInt;
+    ScreenFadeSpeed : LongInt;
 
 
 procedure initModule;