Преглед изворни кода

* compilation fixed

git-svn-id: trunk@47696 -
florian пре 4 година
родитељ
комит
19ce665b3d
1 измењених фајлова са 1 додато и 0 уклоњено
  1. 1 0
      compiler/nflw.pas

+ 1 - 0
compiler/nflw.pas

@@ -1560,6 +1560,7 @@ implementation
         paratype: tdef;
       begin
         result:=nil;
+        in_nr:=Default(tinlinenumber);
         { optimize constant expressions }
         if (left.nodetype=ordconstn) then
           begin