summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/continuation_7.f90
blob: 02602e86a3657e2213c837a724a45f9929adc9c0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
! { dg-do compile }
! { dg-options "-Wall -std=f95" }
! There should only two warnings be printed.
! PR fortran/30968
print *, "Foo bar&
        &Bar foo"
print *, "Foo bar&
        Bar foo" ! { dg-warning "Missing '&' in continued character constant" }
print *, "Foo bar"&
        &, "Bar foo"
print *, "Foo bar"&
        , "Bar foo"

print '(&
    a)', 'Hello' ! { dg-warning "Missing '&' in continued character constant" }
print '(&
   &a)', 'Hello'
print '('&
   &//'a)', 'Hello'
print '('&
   // "a)", 'Hello'
end