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

* Added missing "override" directive for XML node dump routine on TDerefNode

J. Gareth "Curious Kit" Moreton пре 1 година
родитељ
комит
4378319f87
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      compiler/nmem.pas

+ 1 - 1
compiler/nmem.pas

@@ -119,7 +119,7 @@ interface
           function pass_typecheck:tnode;override;
           procedure mark_write;override;
 {$ifdef DEBUG_NODE_XML}
-          procedure XMLPrintNodeInfo(var T: Text);
+          procedure XMLPrintNodeInfo(var T: Text); override;
 {$endif DEBUG_NODE_XML}
        end;
        tderefnodeclass = class of tderefnode;