ieee_9.f90: XFAIL on arm*-*-gnueabi[hf].
[official-gcc.git] / gcc / testsuite / gfortran.dg / transfer_resolve_2.f90
blobb6c5ddd347f62bdd2016fb370d70db7795dba72c
1 ! { dg-do compile }
3 ! PR fortran/56079
5 ! Contributed by Thomas Koenig
7 program gar_nichts
8 use ISO_C_BINDING
9 use ISO_C_BINDING, only: C_PTR
10 use ISO_C_BINDING, only: abc => C_PTR
11 use ISO_C_BINDING, only: xyz => C_PTR
12 type(xyz) nada
13 nada = transfer(C_NULL_PTR,nada)
14 end program gar_nichts