hedgewars/uUtils.pas
changeset 6978 1dc33050149d
parent 6894 555a8d8db228
child 6990 40e5af28d026
--- 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;