Просмотр исходного кода

+ ttempcreatenode.printnodedata writes tempinitcode node

git-svn-id: trunk@24116 -
florian 12 лет назад
Родитель
Сommit
7155808570
1 измененных файлов с 2 добавлено и 0 удалено
  1. 2 0
      compiler/nbas.pas

+ 2 - 0
compiler/nbas.pas

@@ -950,6 +950,8 @@ implementation
         inherited printnodedata(t);
         writeln(t,printnodeindention,'size = ',size,', temptypedef = ',tempinfo^.typedef.typesymbolprettyname,' = "',
           tempinfo^.typedef.GetTypeName,'", tempinfo = $',hexstr(ptrint(tempinfo),sizeof(ptrint)*2));
+        writeln(t,printnodeindention,'tempinit =');
+        printnode(t,tempinfo^.tempinitcode);
       end;
 
 {*****************************************************************************