arm: Add .type and .size to __gnu_cmse_nonsecure_call [PR115360]

[official-gcc.git] / gcc / testsuite / gfortran.dg / pr107397.f90

!{ dg-do compile }
!
program p
  implicit none
  type t
    real :: a = 1.0
  end type
  type(t), parameter :: x = z'1' ! { dg-error "incompatible with a BOZ" }
  x%a = x%a + 2 ! { dg-error "has no IMPLICIT type" }
end