[Committed] Fix fortran/32968 and 32969.

[Steve Kargl]

The attached patch fixes more of the -fdefault-integer-8 fallout.
It forces the arguments and return KIND for several functions
to match the KIND expected by the library or return value.

It eas regression tested on amd64-*-freebsd by me.  FX had
approved a portion of the patch and Dominique tested a portion
on some flavor of ppc*-*-darwin.

2008-08-04  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR fortran/32968
	* gfortran.dg/selected_kind_1.f90: New test.

2008-08-04  Steven G. Kargl  <kargl@gcc.gnu.org>

	PR fortran/32969
	* iresolve.c (gfc_resolve_rrspacing): Convert argument(s) to
	expected KIND.
	(gfc_resolve_scale): Ditto.
	(gfc_resolve_set_exponent): Ditto.
	(gfc_resolve_spacing): Ditto.
 
	PR fortran/32968
	* trans-intrinsic.c (gfc_conv_intrinsic_si_kind,
	gfc_conv_intrinsic_sr_kind): Convert the argument(s) to the
	expected KIND, and fold the result to the expected KIND.

-- 
Steve
-------------- next part --------------
A non-text attachment was scrubbed...
Name: a.diff
Type: text/x-diff
Size: 5195 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20070804/db0fc0cf/attachment.bin>