diff --git a/flang/module/__fortran_ieee_exceptions.f90 b/flang/module/__fortran_ieee_exceptions.f90 index 77dc6f8551786..785c4adaec25d 100644 --- a/flang/module/__fortran_ieee_exceptions.f90 +++ b/flang/module/__fortran_ieee_exceptions.f90 @@ -27,10 +27,8 @@ ieee_denorm = ieee_flag_type(32) ! PGI extension type(ieee_flag_type), parameter :: & - ieee_usual(*) = [ & - ieee_overflow, ieee_divide_by_zero, ieee_invalid ], & - ieee_all(*) = [ & - ieee_usual, ieee_underflow, ieee_inexact, ieee_denorm ] + ieee_usual(*) = [ ieee_overflow, ieee_divide_by_zero, ieee_invalid ], & + ieee_all(*) = [ ieee_usual, ieee_underflow, ieee_inexact ] type :: ieee_modes_type ! Fortran 2018, 17.7 private