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