OSDN Git Service
(root)
/
pf3gnuchains
/
gcc-fork.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
2011-01-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
[pf3gnuchains/gcc-fork.git]
/
gcc
/
testsuite
/
gfortran.dg
/
continuation_5.f
1
! { dg-do compile }
2
! { dg-options -std=f95 }
3
! PR 19262 Test limit on line continuations. Test case derived form case in PR
4
! by Steve Kargl. Submitted by Jerry DeLisle <jvdelisle@gcc.gnu.org>
5
print *,
6
c "1" // ! 1
7
c "2" // ! 2
8
c "3" // ! 3
9
c "4" // ! 4
10
c "5" // ! 5
11
c "6" // ! 6
12
c "7" // ! 7
13
c "8" // ! 8
14
c "9" // ! 9
15
c "0" // ! 10
16
c "1" // ! 11
17
c "2" // ! 12
18
c "3" // ! 13
19
c "4" // ! 14
20
c "5" // ! 15
21
c "6" // ! 16
22
c "7" // ! 17
23
c "8" // ! 18
24
c "9" ! 19
25
print *,
26
c "1" // ! 1
27
c "2" // ! 2
28
c "3" // ! 3
29
c "4" // ! 4
30
c "5" // ! 5
31
c "6" // ! 6
32
c "7" // ! 7
33
c "8" // ! 8
34
c "9" // ! 9
35
!
36
c
37
*
38
C
39
c "0" // ! 10
40
c "1" // ! 11
41
c "2" // ! 12
42
c "3" // ! 13
43
c "4" // ! 14
44
c
45
46
!
47
!
48
c "5" // ! 15
49
c "6" // ! 16
50
c "7" // ! 17
51
c "8" // ! 18
52
c "9" // ! 19
53
c "0" ! { dg-warning "Limit of 19 continuations exceeded" }
54
end