1! { dg-do compile } 2! { dg-skip-if "NaN not supported" { spu-*-* } } 3! PR fortran/37930 4program test 5 implicit none 6 integer i 7 i = transfer(-1,1.0) ! { dg-error "Conversion" } 8end program test 9