diff --git a/testing/adios2/engine/bp/TestBPFortranToCppWriter.F90 b/testing/adios2/engine/bp/TestBPFortranToCppWriter.F90
index 0d78bbef7e..68debc2b3b 100644
--- a/testing/adios2/engine/bp/TestBPFortranToCppWriter.F90
+++ b/testing/adios2/engine/bp/TestBPFortranToCppWriter.F90
@@ -4,7 +4,7 @@ program TestBPFortranToCppWriter
    implicit none
 
 #ifndef __GFORTRAN__
-#ifndef __GNUC__
+#if !defined(__GNUC__) || defined(_CRAYFTN)
    interface
       integer function iargc()
       end function iargc