diff --git a/flang/test/Semantics/call17.f90 b/flang/test/Semantics/call17.f90
--- a/flang/test/Semantics/call17.f90
+++ b/flang/test/Semantics/call17.f90
@@ -1,4 +1,4 @@
-! RUN: %f18 -fsyntax-only $s 2>&1 | FileCheck %s
+! RUN: %f18 -fsyntax-only %s 2>&1 | FileCheck %s --allow-empty
 
 ! Regression test: don't emit a bogus error about an invalid specification expression
 ! in the declaration of a binding