1 files changed, 12 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/only_clause_main.c b/gcc/testsuite/gfortran.dg/only_clause_main.c
new file mode 100644
index 000000000..2cc6c8dd3
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/only_clause_main.c
@@ -0,0 +1,12 @@
+/* this is an f90 function */
+void testOnly(int *cIntPtr);
+
+int main(int argc, char **argv)
+{
+   int myCInt;
+
+   myCInt = -11;
+   testOnly(&myCInt);
+   
+   return 0;
+}/* end main() */