* null-terminate tai_strings loaded from ppus

git-svn-id: branches/hlcgllvm@28133 -
This commit is contained in:
Jonas Maebe 2014-07-02 17:24:53 +00:00
parent 9f39188253
commit 23f34608ed

View File

@ -2057,8 +2057,9 @@ implementation
begin
inherited ppuload(t,ppufile);
len:=ppufile.getlongint;
getmem(str,len);
getmem(str,len+1);
ppufile.getdata(str^,len);
str[len]:=#0
end;