| commit | 67d1f463dc8177255d883c6bd55b7d23db86bdad | |
| author | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Sat, 29 Jan 2005 17:46:34 +0000 (29 17:46 +0000) | ||
| committer | pbrook <pbrook@138bc75d-0d04-0410-961f-82ee72b054a4> | |
| Sat, 29 Jan 2005 17:46:34 +0000 (29 17:46 +0000) | ||
| tree | 4e5cd3273822f358db1e26f4e1b1abfde7234436 | treesnapshot (tar.gz zip) |
| parent | aebc8537fd59ab4cd6e0cea7b784acdf17b03745 | commitdiff |
2005-01-29 Paul Brook <paul@codesourcery.com>
PR fortran/18565
* check.c (real_or_complex_check): New function.
(gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc): New functions.
* intrinsic.c (add_functions): Use new check functions.
* intrinsic.h (gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc):
Add prototypes.
testsuite/
* gfortran.dg/double_complex_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@94412 138bc75d-0d04-0410-961f-82ee72b054a4
PR fortran/18565
* check.c (real_or_complex_check): New function.
(gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc): New functions.
* intrinsic.c (add_functions): Use new check functions.
* intrinsic.h (gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc):
Add prototypes.
testsuite/
* gfortran.dg/double_complex_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@94412 138bc75d-0d04-0410-961f-82ee72b054a4