summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/continuation_4.f90
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/continuation_4.f90')
-rw-r--r--gcc/testsuite/gfortran.dg/continuation_4.f90262
1 files changed, 262 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/continuation_4.f90 b/gcc/testsuite/gfortran.dg/continuation_4.f90
new file mode 100644
index 000000000..7dfbf5d0c
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/continuation_4.f90
@@ -0,0 +1,262 @@
+! { 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 *, &
+ "1" // & ! 1 Counting in groups of 40.
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 15
+ "6" // & ! 16
+ "7" // & ! 17
+ "8" // & ! 18
+ "9" // & ! 19
+ "0" // & ! 20
+ "1" // & ! 21
+ "2" // & ! 22
+ "3" // & ! 23
+ "4" // & ! 24
+ "5" // & ! 25
+ "6" // & ! 26
+ "7" // & ! 27
+ "8" // & ! 28
+ "9" // & ! 29
+ "0" // & ! 30
+ "1" // & ! 31
+ "2" // & ! 32
+ "3" // & ! 33
+ "4" // & ! 34
+ "5" // & ! 35
+ "6" // & ! 36
+ "7" // & ! 37
+ "8" // & ! 38
+ "9" // & ! 39
+ "0" // & ! 40
+ "1" // & ! 1
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 15
+ "6" // & ! 16
+ "7" // & ! 17
+ "8" // & ! 18
+ "9" // & ! 19
+ "0" // & ! 20
+ "1" // & ! 21
+ "2" // & ! 22
+ "3" // & ! 23
+ "4" // & ! 24
+ "5" // & ! 25
+ "6" // & ! 26
+ "7" // & ! 27
+ "8" // & ! 28
+ "9" // & ! 29
+ "0" // & ! 30
+ "1" // & ! 31
+ "2" // & ! 32
+ "3" // & ! 33
+ "4" // & ! 34
+ "5" // & ! 35
+ "6" // & ! 36
+ "7" // & ! 37
+ "8" // & ! 38
+ "9" // & ! 39
+ "0" // & ! 80
+ "1" // & ! 1
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 15
+ "6" // & ! 16
+ "7" // & ! 17
+ "8" // & ! 18
+ "9" // & ! 19
+ "0" // & ! 20
+ "1" // & ! 21
+ "2" // & ! 22
+ "3" // & ! 23
+ "4" // & ! 24
+ "5" // & ! 25
+ "6" // & ! 26
+ "7" // & ! 27
+ "8" // & ! 28
+ "9" // & ! 29
+ "0" // & ! 30
+ "1" // & ! 31
+ "2" // & ! 32
+ "3" // & ! 33
+ "4" // & ! 34
+ "5" // & ! 35
+ "6" // & ! 36
+ "7" // & ! 37
+ "8" // & ! 38
+ "9" // & ! 39
+ "0" // & ! 120
+ "1" // & ! 1
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 15
+ "6" // & ! 16
+ "7" // & ! 17
+ "8" // & ! 18
+ "9" // & ! 19
+ "0" // & ! 20
+ "1" // & ! 21
+ "2" // & ! 22
+ "3" // & ! 23
+ "4" // & ! 24
+ "5" // & ! 25
+ "6" // & ! 26
+ "7" // & ! 27
+ "8" // & ! 28
+ "9" // & ! 29
+ "0" // & ! 30
+ "1" // & ! 31
+ "2" // & ! 32
+ "3" // & ! 33
+ "4" // & ! 34
+ "5" // & ! 35
+ "6" // & ! 36
+ "7" // & ! 37
+ "8" // & ! 38
+ "9" // & ! 39
+ "0" // & ! 160
+ "1" // & ! 1
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 15
+ "6" // & ! 16
+ "7" // & ! 17
+ "8" // & ! 18
+ "9" // & ! 19
+ "0" // & ! 20
+ "1" // & ! 21
+ "2" // & ! 22
+ "3" // & ! 23
+ "4" // & ! 24
+ "5" // & ! 25
+ "6" // & ! 26
+ "7" // & ! 27
+ "8" // & ! 28
+ "9" // & ! 29
+ "0" // & ! 30
+ "1" // & ! 31
+ "2" // & ! 32
+ "3" // & ! 33
+ "4" // & ! 34
+ "5" // & ! 35
+ "6" // & ! 36
+ "7" // & ! 37
+ "8" // & ! 38
+ "9" // & ! 39
+ "0" // & ! 200
+ "1" // & ! 1
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 15
+ "6" // & ! 16
+ "7" // & ! 17
+ "8" // & ! 18
+ "9" // & ! 19
+ "0" // & ! 20
+ "1" // & ! 21
+ "2" // & ! 22
+ "3" // & ! 23
+ "4" // & ! 24
+ "5" // & ! 25
+ "6" // & ! 26
+ "7" // & ! 27
+ "8" // & ! 28
+ "9" // & ! 29
+ "0" // & ! 30
+ "1" // & ! 31
+ "2" // & ! 32
+ "3" // & ! 33
+ "4" // & ! 34
+ "5" // & ! 35
+ "6" // & ! 36
+ "7" // & ! 37
+ "8" // & ! 38
+ "9" // & ! 39
+ "0" // & ! 240
+ "1" // & ! 1
+ "2" // & ! 2
+ "3" // & ! 3
+ "4" // & ! 4
+ "5" // & ! 5
+ "6" // & ! 6
+ "7" // & ! 7
+ "8" // & ! 8
+ "9" // & ! 9
+ "0" // & ! 10
+ "1" // & ! 11
+ "2" // & ! 12
+ "3" // & ! 13
+ "4" // & ! 14
+ "5" // & ! 255
+ "0" ! { dg-warning "Limit of 255 continuations exceeded" }
+end \ No newline at end of file
generated by cgit v1.2.3 (git 2.25.1) at 2025-04-21 23:59:17 +0000