1! { dg-do compile } 2! { dg-options -std=f2003 } 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 Counting by 40. 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 c "0" // ! 20 26 c "1" // ! 21 27 c "2" // ! 22 28 c "3" // ! 23 29 c "4" // ! 24 30 c "5" // ! 25 31 c "6" // ! 26 32 c "7" // ! 27 33 c "8" // ! 28 34 c "9" // ! 29 35 c "0" // ! 30 36 c "1" // ! 31 37 c "2" // ! 32 38 c "3" // ! 33 39 c "4" // ! 34 40 c "5" // ! 35 41 c "6" // ! 36 42 c "7" // ! 37 43 c "8" // ! 38 44 c "9" // ! 39 45 c "0" // ! 40 46 c "1" // ! 1 47 c "2" // ! 2 48 c "3" // ! 3 49 c "4" // ! 4 50 c "5" // ! 5 51 c "6" // ! 6 52 c "7" // ! 7 53 c "8" // ! 8 54 c "9" // ! 9 55 c "0" // ! 10 56 c "1" // ! 11 57 c "2" // ! 12 58 c "3" // ! 13 59 c "4" // ! 14 60 c "5" // ! 15 61 c "6" // ! 16 62 c "7" // ! 17 63 c "8" // ! 18 64 c "9" // ! 19 65 c "0" // ! 20 66 c "1" // ! 21 67 c "2" // ! 22 68 c "3" // ! 23 69 c "4" // ! 24 70 c "5" // ! 25 71 c "6" // ! 26 72 c "7" // ! 27 73 c "8" // ! 28 74 c "9" // ! 29 75 c "0" // ! 30 76 c "1" // ! 31 77 c "2" // ! 32 78 c "3" // ! 33 79 c "4" // ! 34 80 c "5" // ! 35 81 c "6" // ! 36 82 c "7" // ! 37 83 c "8" // ! 38 84 c "9" // ! 39 85 c "0" // ! 80 86 c "1" // ! 1 87 c "2" // ! 2 88 c "3" // ! 3 89 c "4" // ! 4 90 c "5" // ! 5 91 c "6" // ! 6 92 c "7" // ! 7 93 c "8" // ! 8 94 c "9" // ! 9 95 c "0" // ! 10 96 c "1" // ! 11 97 c "2" // ! 12 98 c "3" // ! 13 99 c "4" // ! 14 100 c "5" // ! 15 101 c "6" // ! 16 102 c "7" // ! 17 103 c "8" // ! 18 104 c "9" // ! 19 105 c "0" // ! 20 106 c "1" // ! 21 107 c "2" // ! 22 108 c "3" // ! 23 109 c "4" // ! 24 110 c "5" // ! 25 111 c "6" // ! 26 112 c "7" // ! 27 113 c "8" // ! 28 114 c "9" // ! 29 115 c "0" // ! 30 116 c "1" // ! 31 117 c "2" // ! 32 118 c "3" // ! 33 119 c "4" // ! 34 120 c "5" // ! 35 121 c "6" // ! 36 122 c "7" // ! 37 123 c "8" // ! 38 124 c "9" // ! 39 125 c "0" // ! 120 126 c "1" // ! 1 127 c "2" // ! 2 128 c "3" // ! 3 129 c "4" // ! 4 130 c "5" // ! 5 131 c "6" // ! 6 132 c "7" // ! 7 133 c "8" // ! 8 134 c "9" // ! 9 135 c "0" // ! 10 136 c "1" // ! 11 137 c "2" // ! 12 138 c "3" // ! 13 139 c "4" // ! 14 140 c "5" // ! 15 141 c "6" // ! 16 142 c "7" // ! 17 143 c "8" // ! 18 144 c "9" // ! 19 145 c "0" // ! 20 146 c "1" // ! 21 147 c "2" // ! 22 148 c "3" // ! 23 149 c "4" // ! 24 150 c "5" // ! 25 151 c "6" // ! 26 152 c "7" // ! 27 153 c "8" // ! 28 154 c "9" // ! 29 155 c "0" // ! 30 156 c "1" // ! 31 157 c "2" // ! 32 158 c "3" // ! 33 159 c "4" // ! 34 160 c "5" // ! 35 161 c "6" // ! 36 162 c "7" // ! 37 163 c "8" // ! 38 164 c "9" // ! 39 165 c "0" // ! 160 166 c "1" // ! 1 167 c "2" // ! 2 168 c "3" // ! 3 169 c "4" // ! 4 170 c "5" // ! 5 171 c "6" // ! 6 172 c "7" // ! 7 173 c "8" // ! 8 174 c "9" // ! 9 175 c "0" // ! 10 176 c "1" // ! 11 177 c "2" // ! 12 178 c "3" // ! 13 179 c "4" // ! 14 180 c "5" // ! 15 181 c "6" // ! 16 182 c "7" // ! 17 183 c "8" // ! 18 184 c "9" // ! 19 185 c "0" // ! 20 186 c "1" // ! 21 187 c "2" // ! 22 188 c "3" // ! 23 189 c "4" // ! 24 190 c "5" // ! 25 191 c "6" // ! 26 192 c "7" // ! 27 193 c "8" // ! 28 194 c "9" // ! 29 195 c "0" // ! 30 196 c "1" // ! 31 197 c "2" // ! 32 198 c "3" // ! 33 199 c "4" // ! 34 200 c "5" // ! 35 201 c "6" // ! 36 202 c "7" // ! 37 203 c "8" // ! 38 204 c "9" // ! 39 205 c "0" // ! 200 206 c "1" // ! 1 207 c "2" // ! 2 208 c "3" // ! 3 209 c "4" // ! 4 210 c "5" // ! 5 211 c "6" // ! 6 212 c "7" // ! 7 213 c "8" // ! 8 214 c "9" // ! 9 215 c "0" // ! 10 216 c "1" // ! 11 217 c "2" // ! 12 218 c "3" // ! 13 219 c "4" // ! 14 220 c "5" // ! 15 221 c "6" // ! 16 222 c "7" // ! 17 223 c "8" // ! 18 224 c "9" // ! 19 225 c "0" // ! 20 226 c "1" // ! 21 227 c "2" // ! 22 228 c "3" // ! 23 229 c "4" // ! 24 230 c "5" // ! 25 231 c "6" // ! 26 232 c "7" // ! 27 233 c "8" // ! 28 234 c "9" // ! 29 235 c "0" // ! 30 236 c "1" // ! 31 237 c "2" // ! 32 238 c "3" // ! 33 239 c "4" // ! 34 240 c "5" // ! 35 241 c "6" // ! 36 242 c "7" // ! 37 243 c "8" // ! 38 244 c "9" // ! 39 245 c "0" // ! 240 246 c "1" // ! 1 247 c "2" // ! 2 248 c "3" // ! 3 249 c "4" // ! 4 250 c "5" // ! 5 251 c "6" // ! 6 252 c "7" // ! 7 253 c "8" // ! 8 254 c "9" // ! 9 255 c "0" // ! 10 256 c "1" // ! 11 257 c "2" // ! 12 258 c "3" // ! 13 259 c "4" // ! 14 260 c "5" // ! 255 261 c "6" ! { dg-warning "Limit of 255 continuations exceeded" } 262 263 end 264