2 ! Tests the fix for PR30319, in which the use of the parameter 'aa' in
3 ! the array constructor that initialises bb would cause an internal
6 ! Contributed by Vivek Rao <vivekrao4@yahoo.com>
9 character (len
=1), parameter :: aa
= "z", bb(1) = (/aa
/)