Mercurial Mercurial > hedgewars / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
grmlgrml
authorsheepluva
Wed, 17 Dec 2014 19:23:57 +0100
changeset 10690 c3b73dc33294
parent 10689 692649e341fc
child 10691 97f45f1374be
grmlgrml
hedgewars/uRenderUtils.pas file | annotate | diff | comparison | revisions
hedgewars/uUtils.pas file | annotate | diff | comparison | revisions 
--- a/hedgewars/uRenderUtils.pas	Wed Dec 17 19:03:33 2014 +0100
+++ b/hedgewars/uRenderUtils.pas	Wed Dec 17 19:23:57 2014 +0100
@@ -311,6 +311,8 @@
 begin
     m:= Length(s);
 
+    substr:= '';
+
     SetLengthA(substr, m);
 
     // number of chars read
--- a/hedgewars/uUtils.pas	Wed Dec 17 19:03:33 2014 +0100
+++ b/hedgewars/uUtils.pas	Wed Dec 17 19:23:57 2014 +0100
@@ -74,6 +74,7 @@
 procedure Write(var f: textfile; s: shortstring);
 procedure WriteLn(var f: textfile; s: shortstring);
 function StrLength(s: PChar): Longword;
+procedure SetLengthA(var s: ansistring; len: Longword);
 {$ENDIF}
 
 function  isPhone: Boolean; inline;
hedgewars