Przeglądaj źródła

* binary writer must take care of resource sections as well

git-svn-id: trunk@1200 -
florian 20 lat temu
rodzic
commit
43cf42b3b6
1 zmienionych plików z 2 dodań i 2 usunięć
  1. 2 2
      compiler/ogelf.pas

+ 2 - 2
compiler/ogelf.pas

@@ -360,8 +360,8 @@ implementation
           'fpc'
         );
       begin
-        if use_smartlink_section and
-           (aname<>'') then
+        if (use_smartlink_section and
+           (aname<>'')) or (atype=sec_fpc) then
           result:=secnames[atype]+'.'+aname
         else
           result:=secnames[atype];