PR inline-asm/84742
[official-gcc.git] / gcc / testsuite / gfortran.dg / c_sizeof_2.f90
blobe3911facf6a158df78e4072787215829ff78b991
1 ! { dg-do compile }
2 ! { dg-options "-std=f2003 -Wall -Wno-conversion" }
3 ! Support F2008's c_sizeof()
5 USE ISO_C_BINDING, only: C_SIZE_T, c_sizeof ! { dg-error "is not in the selected standard" }
6 integer(C_SIZE_T) :: i
7 i = c_sizeof(i)
8 end