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

* fixed warning

git-svn-id: trunk@4193 -
Jonas Maebe преди 19 години
родител
ревизия
b5fe67351e
променени са 1 файла, в които са добавени 2 реда и са изтрити 0 реда
  1. 2 0
      compiler/node.pas

+ 2 - 0
compiler/node.pas

@@ -544,6 +544,8 @@ implementation
       begin
       begin
         { reading of node references isn't implemented yet (FK) }
         { reading of node references isn't implemented yet (FK) }
         internalerror(200506182);
         internalerror(200506182);
+        { avoid warning }
+        result := nil;
       end;
       end;