Преглед на файлове

+ print optinfo pointer if set

florian преди 2 години
родител
ревизия
2c51abf40d
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 2 0
      compiler/node.pas

+ 2 - 0
compiler/node.pas

@@ -887,6 +887,8 @@ implementation
         write(t,']');
         if (nf_pass1_done in flags) then
           write(t,', cmplx = ',node_complexity(self));
+        if assigned(optinfo) then
+          write(t,', optinfo = ',HexStr(optinfo));
       end;