hedgewars/uUtils.pas
changeset 7028 0f60591f3a16
parent 7027 f264ad9d8965
child 7043 7c080e5ac8d0
--- a/hedgewars/uUtils.pas	Sat May 05 18:10:41 2012 +0100
+++ b/hedgewars/uUtils.pas	Sat May 05 19:04:59 2012 +0100
@@ -75,6 +75,7 @@
 {$IFDEF DEBUGFILE}
 var f: textfile;
 {$ENDIF}
+var CharArray: array[byte] of Char;
 
 // should this include "strtolower()" for the split string?
 procedure SplitBySpace(var a, b: shortstring);
@@ -259,7 +260,6 @@
 end;
 
 
-var CharArray: array[byte] of Char;
 function Str2PChar(const s: shortstring): PChar;
 begin
 CharArray:= s;