1! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s 2! CHECK-NOT: expected '=>' 3! CHECK: error: expected 'THEN' 4if (.false.) then 5else if (.false.) 6else 7end if 8end 9