flang/test/Semantics/structconst06.f90

   1 ! RUN: %python %S/test_errors.py %s %flang_fc1
   2 ! Don't expand scalars for allocatable components.
   3 module m
   4   type t
   5     real, allocatable :: a(:)
   6   end type
   7   !ERROR: Scalar value cannot be expanded to shape of array component 'a'
   8   type(t) :: x = t(0.)
   9 end module