1 ! RUN: not %flang_fc1 -fsyntax-only %s 2>&1 | FileCheck %s
2 continue ! force executable part
3 CALL ADD_HASH_BLOCK(d_c
,f_c
,dimc
, &
4 (h2b
-1+noab
*(h1b
-1+noab
*(p4b
-noab
-1+nvab
*(p3b
-noab
-1$)))))
7 !CHECK: error: expected ')'
8 !CHECK: in the context: CALL statement
