# HG changeset patch # User unc0rr # Date 1335886110 -14400 # Node ID 1dc33050149d04b9f63b4fb3806c249c45899a82 # Parent 6a2ecad333dabda1842238c580189d5b34790a04 Make Str2PChar more pas2c-friendly diff -r 6a2ecad333da -r 1dc33050149d hedgewars/uUtils.pas --- 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;