Przeglądaj źródła

* fixed i8086 compilation after r43265

git-svn-id: trunk@43289 -
nickysn 5 lat temu
rodzic
commit
cb9f569906
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      compiler/ogomf.pas

+ 2 - 2
compiler/ogomf.pas

@@ -130,7 +130,7 @@ interface
         destructor destroy;override;
         destructor destroy;override;
         class function sectiontype2options(atype:TAsmSectiontype):TObjSectionOptions;override;
         class function sectiontype2options(atype:TAsmSectiontype):TObjSectionOptions;override;
         function sectiontype2align(atype:TAsmSectiontype):longint;override;
         function sectiontype2align(atype:TAsmSectiontype):longint;override;
-        function sectiontype2class(atype:TAsmSectiontype):string;
+        class function sectiontype2class(atype:TAsmSectiontype):string;
         function sectionname(atype:TAsmSectiontype;const aname:string;aorder:TAsmSectionOrder):string;override;
         function sectionname(atype:TAsmSectiontype;const aname:string;aorder:TAsmSectionOrder):string;override;
         function createsection(atype:TAsmSectionType;const aname:string='';aorder:TAsmSectionOrder=secorder_default):TObjSection;override;
         function createsection(atype:TAsmSectionType;const aname:string='';aorder:TAsmSectionOrder=secorder_default):TObjSection;override;
         function reffardatasection:TObjSection;
         function reffardatasection:TObjSection;
@@ -1084,7 +1084,7 @@ implementation
         Result:=omf_sectiontype2align(atype);
         Result:=omf_sectiontype2align(atype);
       end;
       end;
 
 
-    function TOmfObjData.sectiontype2class(atype: TAsmSectiontype): string;
+    class function TOmfObjData.sectiontype2class(atype: TAsmSectiontype): string;
       begin
       begin
         Result:=omf_segclass(atype);
         Result:=omf_segclass(atype);
       end;
       end;