* gfortran.fortran-torture/execute/getarg_1.x: New file.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146246 138bc75d-0d04-0410-961f-82ee72b054a4
jrrk2 · Apr 17, 2009 · 7202c48 · 7202c48
1 parent 6c09213
commit 7202c48
Show file tree

Hide file tree

Showing 2 changed files with 9 additions and 0 deletions.
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
+
+	* gfortran.fortran-torture/execute/getarg_1.x: New file.
+
 2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
 
 	* gfortran.dg/vect/pr39318.f90: Guard with "target fopenmp".

diff --git a/gcc/testsuite/gfortran.fortran-torture/execute/getarg_1.x b/gcc/testsuite/gfortran.fortran-torture/execute/getarg_1.x
@@ -0,0 +1,5 @@
+if [istarget "spu-*-*"] {
+    # We need -mstdmain to enable argument processing on SPU.
+    lappend additional_flags "-mstdmain"
+}
+return 0