+ added size info to the 'Var X located at' comment generated in the asm output

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@27454 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 2 insertions, 1 deletions

diff --git a/compiler/ncgutil.pas b/compiler/ncgutil.pas
index e0689a512b..2184f391b1 100644
--- a/compiler/ncgutil.pas
+++ b/compiler/ncgutil.pas
@@ -1515,7 +1515,8 @@ implementation
                   begin
                     if not assigned(vs.initialloc.reference.symbol) then
                       list.concat(Tai_comment.Create(strpnew('Var '+vs.realname+' located at '+
-                         std_regname(vs.initialloc.reference.base)+tostr_with_plus(vs.initialloc.reference.offset))));
+                         std_regname(vs.initialloc.reference.base)+tostr_with_plus(vs.initialloc.reference.offset)+
+                         ', size='+tcgsize2str(vs.initialloc.size))));
                   end;
               end;
             end;