--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/gcc/testsuite/gfortran.dg/dec_math_4.f90 Mon May 25 07:50:57 2020 +0900 @@ -0,0 +1,8 @@ +! { dg-options "-std=gnu" } +! { dg-do compile } + +! Former ICE when simplifying complex cotan +complex, parameter :: z = cotan((1., 1.)) +print *, z + +end