[gfortran] Intrinsics as actual arguments

[Paul Brook]

The attached patch contains fixes for intrinsic functions when used as 
actual arguments, and the corresponding testcase.

Applied to tree-ssa branch.

Paul

2003-10-11  Paul Brook  <paul@nowt.org>

	* iresolve.c (gfc_resolve_dint, gfc_resolve_dnint): New functions.
	(gfc_resolve_dprod): New function.
	(gfc_resolve_aint, gfc_resolve_anint): Only base name on arg type.
	* intrinsic.h (gfc_resolve_dint, gfc_resolve_dnint): Declare.
	(gfc_resolve_dprod): Declare.
	* intrinsic.c (add_functions): Use them.
	* trans-decl.c (gfc_get_extern_function_decl): Only pass one arg.
testsuite
	* gfortran.fortran-torture/execute/specifics.f90: New test.
libgfortran
	* intrinsics/dprod_r8.f90: New file.
	* Makefile.am (gfor_specific_src): Add it.
	(gfor_built_specific_src): Rename from gfor_build_specific_c.
	Add new intrinsics.
	(gfor_specific2_src): Rename from gfor_built_specific2_c.
	Add new intrinsics.
	* Makefile.in: Regenerate.
	* generated/_aint_*.f90: New files.
	* generated/_anint*.f90: New files.
	* generated/_atan2*.f90: New files.
	* generated/_mod*.f90: New files.
-------------- next part --------------
A non-text attachment was scrubbed...
Name: dprod_r8.f90
Type: text/x-csrc
Size: 1083 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20031011/aad7628b/attachment.bin>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: patch
Type: text/x-diff
Size: 26460 bytes
Desc: not available
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20031011/aad7628b/attachment-0001.bin>