+ added class TRelObjOutput

git-svn-id: trunk@45195 -

compiler/ogrel.pas

@@ -39,9 +39,15 @@ interface
 
     type
 
+      { TRelObjOutput }
+
+      TRelObjOutput = class(tObjOutput)
+      end;
+
       { TRelAssembler }
 
       TRelAssembler = class(tinternalassembler)
+        constructor create(info: pasminfo; smart:boolean);override;
       end;
 
 implementation
@@ -55,6 +61,16 @@ implementation
        ;
 
 
+{*****************************************************************************
+                                TRelAssembler
+*****************************************************************************}
+
+    constructor TRelAssembler.create(info: pasminfo; smart: boolean);
+      begin
+        inherited;
+        CObjOutput:=TRelObjOutput;
+      end;
+
 {*****************************************************************************
                                   Initialize
 *****************************************************************************}