Browse Source

+ added an override of the abstract method TRelObjOutput.writeData (not implemented, yet)

git-svn-id: trunk@45216 -
nickysn 5 years ago
parent
commit
aa6209ab51
1 changed files with 11 additions and 0 deletions
  1. 11 0
      compiler/ogrel.pas

+ 11 - 0
compiler/ogrel.pas

@@ -42,6 +42,8 @@ interface
       { TRelObjOutput }
 
       TRelObjOutput = class(tObjOutput)
+      protected
+        function writeData(Data:TObjData):boolean;override;
       end;
 
       { TRelAssembler }
@@ -60,6 +62,15 @@ implementation
        version
        ;
 
+{*****************************************************************************
+                                TRelObjOutput
+*****************************************************************************}
+
+    function TRelObjOutput.writeData(Data: TObjData): boolean;
+      begin
+        { todo: implement }
+        result:=true;
+      end;
 
 {*****************************************************************************
                                 TRelAssembler