arm: Add .type and .size to __gnu_cmse_nonsecure_call [PR115360]
[official-gcc.git] / gcc / testsuite / gfortran.dg / pr92018.f90
blob6c90d2f6762edcc9ef496cbda0750f706d6fb7a7
1 ! { dg-do compile }
2 ! PR fortran/92018
3 subroutine sub (f)
4 integer :: f
5 print *, f(b'11') ! { dg-error "cannot appear as an actual" }
6 print *, f(o'11') ! { dg-error "cannot appear as an actual" }
7 print *, f(z'11') ! { dg-error "cannot appear as an actual" }
8 end