hedgewars/uMisc.pas
branchwebgl
changeset 9958 5a222923c8f8
parent 9521 8054d9d775fd
child 10015 4feced261c68
--- a/hedgewars/uMisc.pas	Sun Jan 05 13:08:50 2014 +0400
+++ b/hedgewars/uMisc.pas	Sun Jan 05 23:58:13 2014 +0400
@@ -301,7 +301,6 @@
     GetTeamStatString:= s;
 end;
 
-procedure initModule;
 {$IFDEF SDL2}
 const SDL_PIXELFORMAT_ABGR8888 = (1 shl 28) or (6 shl 24) or (7 shl 20) or (6 shl 16) or (32 shl 8) or 4;
 {$ELSE}
@@ -312,6 +311,8 @@
         RMask: RMask; GMask: GMask; BMask: BMask; AMask: AMask;
         colorkey: 0; alpha: 255);
 {$ENDIF}
+
+procedure initModule;
 begin
 {$IFDEF SDL2}
     conversionFormat:= SDL_AllocFormat(SDL_PIXELFORMAT_ABGR8888);