1 ! { dg-options "-O2 -fno-automatic" }
10 s = 'This is a test string'
12 if (i .ne. 26 .or. j .ne. 131) call abort
13 if (s .ne. 'This is a test string') call abort
18 if (s .ne. '0123456789012345678901234567890123456') call abort
23 ! Just clobber stack a little bit.
24 s = '0123456789012345678901234567890123456'