Browse Source

+ set cobjdata in TIntelHexExeOutput.create;

git-svn-id: trunk@45548 -
nickysn 5 năm trước cách đây
mục cha
commit
3685b50e75
1 tập tin đã thay đổi với 8 bổ sung0 xóa
  1. 8 0
      compiler/ogrel.pas

+ 8 - 0
compiler/ogrel.pas

@@ -111,6 +111,8 @@ interface
       protected
         function writeData:boolean;override;
         procedure DoRelocationFixup(objsec:TObjSection);override;
+      public
+        constructor create;override;
       end;
 
 implementation
@@ -683,6 +685,12 @@ implementation
       begin
       end;
 
+    constructor TIntelHexExeOutput.create;
+      begin
+        inherited create;
+        CObjData:=TRelObjData;
+      end;
+
 {*****************************************************************************
                                   Initialize
 *****************************************************************************}