We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent f929078 commit 93810e0Copy full SHA for 93810e0
test/corpus/statements.txt
@@ -252,6 +252,7 @@ If Statements
252
253
PROGRAM TEST
254
IF (x<7) y = 9
255
+ if(ix.ge.1.and.2.le.nx)x=1.4
256
257
IF (arg(1:1) == ADJUSTL(' r')) THEN
258
r = 0
@@ -283,6 +284,12 @@ END PROGRAM
283
284
(if_statement
285
(parenthesized_expression (relational_expression (identifier) (number_literal)))
286
(assignment_statement (identifier) (number_literal)))
287
+ (if_statement
288
+ (parenthesized_expression
289
+ (logical_expression
290
+ (relational_expression (identifier) (number_literal))
291
+ (relational_expression (number_literal) (identifier))))
292
+ (assignment_statement (identifier) (number_literal)))
293
294
(parenthesized_expression
295
(relational_expression
0 commit comments