[AArch64] Merge stores of D-register values with different modes
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr69055.f90
blob48b34424608991b7ba0fca21a939eb2f98e231f9
1 ! { dg-do compile }
2 ! { dg-options "-fsanitize=float-cast-overflow" }
4 subroutine pr69055
5 implicit none
6 integer :: n
7 real(8) :: b
8 b = huge(1.0D0)
9 n = b
10 end subroutine pr69055