* range checking is already performed in pass_typecheck

compiler/arm/narmcon.pas

@@ -108,10 +108,6 @@ interface
                   aitrealconst_s32bit :
                     begin
                       current_procinfo.aktlocaldata.concat(tai_realconst.create_s32real(ts32real(value_real)));
-                      { range checking? }
-                      if floating_point_range_check_error and
-                        (tai_realconst(current_procinfo.aktlocaldata.last).value.s32val=MathInf.Value) then
-                        Message(parser_e_range_check_error);
                     end;
 
                   aitrealconst_s64bit :
@@ -120,31 +116,16 @@ interface
                         current_procinfo.aktlocaldata.concat(tai_realconst.create_s64real_hiloswapped(ts64real(value_real)))
                       else
                         current_procinfo.aktlocaldata.concat(tai_realconst.create_s64real(ts64real(value_real)));
-
-                      { range checking? }
-                      if floating_point_range_check_error and
-                        (tai_realconst(current_procinfo.aktlocaldata.last).value.s64val=MathInf.Value) then
-                        Message(parser_e_range_check_error);
                    end;
 
                   aitrealconst_s80bit :
                     begin
                       current_procinfo.aktlocaldata.concat(tai_realconst.create_s80real(value_real,tfloatdef(resultdef).size));
-
-                      { range checking? }
-                      if floating_point_range_check_error and
-                        (tai_realconst(current_procinfo.aktlocaldata.last).value.s80val=MathInf.Value) then
-                        Message(parser_e_range_check_error);
                     end;
 {$ifdef cpufloat128}
                   aitrealconst_s128bit :
                     begin
                       current_procinfo.aktlocaldata.concat(tai_realconst.create_s128real(value_real));
-
-                      { range checking? }
-                      if floating_point_range_check_error and
-                        (tai_realconst(current_procinfo.aktlocaldata.last).value.s128val=MathInf.Value) then
-                        Message(parser_e_range_check_error);
                     end;
 {$endif cpufloat128}