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

From-SVN: r146246

* gfortran.fortran-torture/execute/getarg_1.x: New file.
From-SVN: r146246
43836431 · Ulrich Weigand · Ulrich Weigand · 1ab456ae · 43836431 · 43836431
Commit 43836431 authored Apr 17, 2009 by Ulrich Weigand Committed by Ulrich Weigand Apr 17, 2009
Hide whitespace changes
Inline Side-by-side

Showing with 9 additions and 0 deletions

gcc/testsuite/ChangeLog
+4 -0

gcc/testsuite/gfortran.fortran-torture/execute/getarg_1.x
+5 -0

No files found.
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
 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".
 2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>

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