Explorar o código

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

J. Gareth "Curious Kit" Moreton hai 1 ano
pai
achega
4378319f87
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  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;