53 lines · plain
1! RUN: %python %S/test_errors.py %s %flang_fc12! Simple check that if constructs are ok.3 4if (a < b) then5 a = 16end if7 8if (a < b) then9 a = 210else11 a = 312endif13 14if (a < b) then15 a = 416else if(a == b) then17 a = 518end if19 20if (a < b) then21 a = 622else if(a == b) then23 a = 724elseif(a > b) then25 a = 826end if27 28if (a < b) then29 a = 930else if(a == b) then31 a = 1032else33 a = 1134end if35 36if (a < b) then37 a = 1238else if(a == b) then39 a = 1340else if(a > b) then41 a = 1442end if43 44if (f()) then45 a = 1546end if47 48contains49 logical function f()50 f = .true.51 end52end53