--- a/hedgewars/uUtils.pas	Tue May 01 16:16:09 2012 +0200
+++ b/hedgewars/uUtils.pas	Tue May 01 19:28:30 2012 +0400
@@ -259,8 +259,8 @@
 end;
 
 
+var CharArray: array[byte] of Char;
 function Str2PChar(const s: shortstring): PChar;
-const CharArray: array[byte] of Char = '';
 begin
 CharArray:= s;
 CharArray[Length(s)]:= #0;