mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-20 10:45:08 +02:00
* fixed indentation of stack slot allocation debug statements
git-svn-id: trunk@26474 -
This commit is contained in:
parent
2518c526c7
commit
8065fc24d9
@ -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);
|
||||
|
Loading…
Reference in New Issue
Block a user