re PR middle-end/46629 (Failed to build 200.sixtrack in SPEC CPU 2000)

	PR middle-end/46629
	* gfortran.dg/lto/pr46629_0.f90: New test.

From-SVN: r167110

gcc/testsuite/ChangeLog

+2010-11-24  Jakub Jelinek  <jakub@redhat.com>
+
+	PR middle-end/46629
+	* gfortran.dg/lto/pr46629_0.f90: New test.
+
 2010-11-24  Mingjie Xing  <mingjie.xing@gmail.com>
 
 	* gcc.target/mips/loongson3a-muldiv-1.c: New test.

gcc/testsuite/gfortran.dg/lto/pr46629_0.f90

+! PR middle-end/64429
+! { dg-lto-do assemble }
+! { dg-lto-options {{ -O2 -flto -ftree-vectorize }} }
+! { dg-lto-options {{ -O2 -flto -ftree-vectorize -march=x86-64 }} { target i?86-*-* x86_64-*-* } }
+
+subroutine foo
+  character(len=6), save :: c
+  real, save :: d(0:100)
+  integer, save :: x, n, i
+  n = x
+  print *, c
+  do i = 2, n
+    d(i) = -d(i-1)
+  end do
+end