Преглед изворни кода

* declare segments as use16 or use32 in the nasm asm writer

git-svn-id: trunk@31493 -
nickysn пре 10 година
родитељ
комит
3b36e3d0b5
1 измењених фајлова са 4 додато и 0 уклоњено
  1. 4 0
      compiler/x86/agx86nsm.pas

+ 4 - 0
compiler/x86/agx86nsm.pas

@@ -557,6 +557,10 @@ interface
                 { yes -> write the section attributes as well }
                 if atype=sec_stack then
                   AsmWrite(' stack');
+                if atype in [sec_debug_frame,sec_debug_info,sec_debug_line,sec_debug_abbrev] then
+                  AsmWrite(' use32')
+                else
+                  AsmWrite(' use16');
                 AsmWrite(' class='+omf_segclass[atype]+
                   ' align='+tostr(omf_sectiontype2align(atype)));
                 FSectionsUsed.Add(secname,nil);