Browse Source

* only i386 uses same special fastcall calling convention

florian 2 years ago
parent
commit
36afcbf7fe
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/dbgdwarf.pas

+ 4 - 0
compiler/dbgdwarf.pas

@@ -1930,8 +1930,12 @@ implementation
       function dwarf_calling_convention(def: tprocdef): Tdwarf_calling_convention;
       function dwarf_calling_convention(def: tprocdef): Tdwarf_calling_convention;
         begin
         begin
           case def.proccalloption of
           case def.proccalloption of
+{$ifdef i386}
             pocall_register:
             pocall_register:
               result:=DW_CC_GNU_borland_fastcall_i386;
               result:=DW_CC_GNU_borland_fastcall_i386;
+{$else i386}
+            pocall_register,
+{$endif i386}
             pocall_cdecl,
             pocall_cdecl,
             pocall_stdcall,
             pocall_stdcall,
             pocall_cppdecl,
             pocall_cppdecl,