1! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s2program main3 call foo(i, &4 j, &5 k, &6 1$)7end8 9!CHECK: error: expected ')'10!CHECK: in the context: CALL statement11