summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/continuation_6.f
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/continuation_6.f')
-rw-r--r--gcc/testsuite/gfortran.dg/continuation_6.f264
1 files changed, 264 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/continuation_6.f b/gcc/testsuite/gfortran.dg/continuation_6.f
new file mode 100644
index 000000000..9bf64ad4e
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/continuation_6.f
@@ -0,0 +1,264 @@
+! { dg-do compile }
+! { dg-options -std=f2003 }
+! PR 19262 Test limit on line continuations. Test case derived form case in PR
+! by Steve Kargl. Submitted by Jerry DeLisle <jvdelisle@gcc.gnu.org>
+ print *,
+ c "1" // ! 1 Counting by 40.
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 15
+ c "6" // ! 16
+ c "7" // ! 17
+ c "8" // ! 18
+ c "9" // ! 19
+ c "0" // ! 20
+ c "1" // ! 21
+ c "2" // ! 22
+ c "3" // ! 23
+ c "4" // ! 24
+ c "5" // ! 25
+ c "6" // ! 26
+ c "7" // ! 27
+ c "8" // ! 28
+ c "9" // ! 29
+ c "0" // ! 30
+ c "1" // ! 31
+ c "2" // ! 32
+ c "3" // ! 33
+ c "4" // ! 34
+ c "5" // ! 35
+ c "6" // ! 36
+ c "7" // ! 37
+ c "8" // ! 38
+ c "9" // ! 39
+ c "0" // ! 40
+ c "1" // ! 1
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 15
+ c "6" // ! 16
+ c "7" // ! 17
+ c "8" // ! 18
+ c "9" // ! 19
+ c "0" // ! 20
+ c "1" // ! 21
+ c "2" // ! 22
+ c "3" // ! 23
+ c "4" // ! 24
+ c "5" // ! 25
+ c "6" // ! 26
+ c "7" // ! 27
+ c "8" // ! 28
+ c "9" // ! 29
+ c "0" // ! 30
+ c "1" // ! 31
+ c "2" // ! 32
+ c "3" // ! 33
+ c "4" // ! 34
+ c "5" // ! 35
+ c "6" // ! 36
+ c "7" // ! 37
+ c "8" // ! 38
+ c "9" // ! 39
+ c "0" // ! 80
+ c "1" // ! 1
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 15
+ c "6" // ! 16
+ c "7" // ! 17
+ c "8" // ! 18
+ c "9" // ! 19
+ c "0" // ! 20
+ c "1" // ! 21
+ c "2" // ! 22
+ c "3" // ! 23
+ c "4" // ! 24
+ c "5" // ! 25
+ c "6" // ! 26
+ c "7" // ! 27
+ c "8" // ! 28
+ c "9" // ! 29
+ c "0" // ! 30
+ c "1" // ! 31
+ c "2" // ! 32
+ c "3" // ! 33
+ c "4" // ! 34
+ c "5" // ! 35
+ c "6" // ! 36
+ c "7" // ! 37
+ c "8" // ! 38
+ c "9" // ! 39
+ c "0" // ! 120
+ c "1" // ! 1
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 15
+ c "6" // ! 16
+ c "7" // ! 17
+ c "8" // ! 18
+ c "9" // ! 19
+ c "0" // ! 20
+ c "1" // ! 21
+ c "2" // ! 22
+ c "3" // ! 23
+ c "4" // ! 24
+ c "5" // ! 25
+ c "6" // ! 26
+ c "7" // ! 27
+ c "8" // ! 28
+ c "9" // ! 29
+ c "0" // ! 30
+ c "1" // ! 31
+ c "2" // ! 32
+ c "3" // ! 33
+ c "4" // ! 34
+ c "5" // ! 35
+ c "6" // ! 36
+ c "7" // ! 37
+ c "8" // ! 38
+ c "9" // ! 39
+ c "0" // ! 160
+ c "1" // ! 1
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 15
+ c "6" // ! 16
+ c "7" // ! 17
+ c "8" // ! 18
+ c "9" // ! 19
+ c "0" // ! 20
+ c "1" // ! 21
+ c "2" // ! 22
+ c "3" // ! 23
+ c "4" // ! 24
+ c "5" // ! 25
+ c "6" // ! 26
+ c "7" // ! 27
+ c "8" // ! 28
+ c "9" // ! 29
+ c "0" // ! 30
+ c "1" // ! 31
+ c "2" // ! 32
+ c "3" // ! 33
+ c "4" // ! 34
+ c "5" // ! 35
+ c "6" // ! 36
+ c "7" // ! 37
+ c "8" // ! 38
+ c "9" // ! 39
+ c "0" // ! 200
+ c "1" // ! 1
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 15
+ c "6" // ! 16
+ c "7" // ! 17
+ c "8" // ! 18
+ c "9" // ! 19
+ c "0" // ! 20
+ c "1" // ! 21
+ c "2" // ! 22
+ c "3" // ! 23
+ c "4" // ! 24
+ c "5" // ! 25
+ c "6" // ! 26
+ c "7" // ! 27
+ c "8" // ! 28
+ c "9" // ! 29
+ c "0" // ! 30
+ c "1" // ! 31
+ c "2" // ! 32
+ c "3" // ! 33
+ c "4" // ! 34
+ c "5" // ! 35
+ c "6" // ! 36
+ c "7" // ! 37
+ c "8" // ! 38
+ c "9" // ! 39
+ c "0" // ! 240
+ c "1" // ! 1
+ c "2" // ! 2
+ c "3" // ! 3
+ c "4" // ! 4
+ c "5" // ! 5
+ c "6" // ! 6
+ c "7" // ! 7
+ c "8" // ! 8
+ c "9" // ! 9
+ c "0" // ! 10
+ c "1" // ! 11
+ c "2" // ! 12
+ c "3" // ! 13
+ c "4" // ! 14
+ c "5" // ! 255
+ c "6" ! { dg-warning "Limit of 255 continuations exceeded" }
+
+ end
+ \ No newline at end of file