* fixed indentation of stack slot allocation debug statements

git-svn-id: trunk@26474 -
This commit is contained in:
Jonas Maebe 2014-01-15 20:36:59 +00:00
parent 2518c526c7
commit 8065fc24d9

View File

@ -271,7 +271,7 @@ implementation
if (fevalstackheight>fmaxevalstackheight) then
fmaxevalstackheight:=fevalstackheight;
if cs_asm_regalloc in current_settings.globalswitches then
list.concat(tai_comment.Create(strpnew('allocated '+tostr(slots)+', stack height = '+tostr(fevalstackheight))));
list.concat(tai_comment.Create(strpnew(' allocated '+tostr(slots)+', stack height = '+tostr(fevalstackheight))));
end;
procedure thlcgjvm.decstack(list: TAsmList;slots: longint);