2007-09-19  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>

	PR fortran/33288
	* arith.c (reduce_unary, reduce_binary_ac, reduce_binary_ca,
	reduce_binary_aa): Call ourselves recursively if an element of
	the constructor is itself a constant array.


2007-09-19  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>

	PR fortran/33288
	* gfortran.dg/array_constructor_19.f90: New test.