aarch64: Add missing ACLE macro for NEON-SVE Bridge
[official-gcc.git] / gcc / testsuite / gfortran.dg / charlen_18.f90
blob5ad287448b45dbc8e806bccde6de268af5497d18
1 ! { dg-do compile }
2 ! { dg-options "-fdec-structure" }
4 ! Check fix for PR98517
6 ! Contributed by Eric Reischer <emr-gnu@hev.psu.edu>
8 SUBROUTINE TEST_BUG
9 IMPLICIT NONE
11 CHARACTER*(*) DEF_VAL
12 PARAMETER (DEF_VAL = 'ABCDEFGH')
14 STRUCTURE /SOME_STRUCT/
15 CHARACTER*64 SOME_VAR /DEF_VAL/
16 END STRUCTURE
18 END