Browse Source

Handle all existing possible values for init_settings.fputype to set Tag_FP_Arch .eabi_attribute

git-svn-id: trunk@44719 -
pierre 5 years ago
parent
commit
3022927a6f
1 changed files with 7 additions and 3 deletions
  1. 7 3
      compiler/arm/narmutil.pas

+ 7 - 3
compiler/arm/narmutil.pas

@@ -197,8 +197,12 @@ interface
                 Internalerror(2019100602);
                 Internalerror(2019100602);
             end;
             end;
             case current_settings.fputype of
             case current_settings.fputype of
+              fpu_none,
               fpu_soft,
               fpu_soft,
-              fpu_libgcc:
+              fpu_libgcc,
+              fpu_fpa,
+              fpu_fpa10,
+              fpu_fpa11:
                 current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_FP_Arch,0));
                 current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_FP_Arch,0));
               fpu_vfpv2:
               fpu_vfpv2:
                 current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_FP_Arch,2));
                 current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_FP_Arch,2));
@@ -213,8 +217,8 @@ interface
               fpu_vfpv4,
               fpu_vfpv4,
               fpu_neon_vfpv4:
               fpu_neon_vfpv4:
                 current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_FP_Arch,5));
                 current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_FP_Arch,5));
-              else
-                Internalerror(2019100603);
+              { else not needed anymore PM 2020/04/13
+                Internalerror(2019100603); }
             end;
             end;
             if FPUARM_HAS_FMA in fpu_capabilities[current_settings.fputype] then
             if FPUARM_HAS_FMA in fpu_capabilities[current_settings.fputype] then
               current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_Advanced_SIMD_arch,2))
               current_asmdata.asmlists[al_start].Concat(tai_eabi_attribute.create(Tag_Advanced_SIMD_arch,2))