1! { dg-do compile } 2! 3! PR fortran/55444 4! 5! Contributed by Henrik Holst 6! 7 BLOCKDATA 8! USE ISO_C_BINDING, ONLY: C_INT, C_FLOAT ! WORKS 9 USE :: ISO_C_BINDING ! FAILS 10 INTEGER(C_INT) X 11 REAL(C_FLOAT) Y 12 COMMON /FOO/ X,Y 13 BIND(C,NAME='fortranStuff') /FOO/ 14 DATA X /1/ 15 DATA Y /2.0/ 16 END BLOCKDATA 17