[patch, fortran] Fix PR 30814, bounds checking for pack

[Thomas Koenig]

On Fri, 2007-07-20 at 00:01 +0200, Thomas Koenig wrote:

:ADDPATCH fortran:

> The test case passes; otherwise, the patch is currently
> regression-testing on i686-pc-linux-gnu.
> 
> OK for trunk if it passes?

Regression-test was OK.
	Thomas

> 	Thomas
> 
> 2007-07-20  Thomas Koenig  <tkoenig@gcc.gnu.org>
> 
> 	PR fortran/30814
> 	* trans-decl.c (generate_function_code):  Add argument
> 	for flag_bounds_check to the array for set_options.
> 
> 2007-07-20  Thomas Koenig  <tkoenig@gcc.gnu.org>
> 
> 	PR fortran/30814
> 	* libgfortran.h:  Add bounds_check to compile_options_t.
> 	* runtime/compile_options.c (set_options):  Add handling
> 	of compile_options.bounds_check.
> 	* intrinsics/pack_generic.c (pack_internal):  Also determine
> 	the number of elements if compile_options.bounds_check is
> 	true.  Raise runtime error if a different array shape is
> 	detected.
> 
> 2007-07-20  Thomas Koenig  <tkoenig@gcc.gnu.org>
> 
> 	PR fortran/30814
> 	* gfortran.dg/pack_bounds_1.f90:  New test case.
>