diff options
| author | Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de> | 2004-08-26 19:11:27 +0200 |
|---|---|---|
| committer | Tobias Schlüter <tobi@gcc.gnu.org> | 2004-08-26 19:11:27 +0200 |
| commit | a1bab9ea96f0a1a2e0b6030237fa4434eab78972 (patch) | |
| tree | bdf9652020a5d0a53ec041237b2420d91b40ebe4 /gcc/fortran/intrinsic.c | |
| parent | 36d59cf798c2bf339594ca6917851b9689f84b5d (diff) | |
| download | gcc-a1bab9ea96f0a1a2e0b6030237fa4434eab78972.zip gcc-a1bab9ea96f0a1a2e0b6030237fa4434eab78972.tar.gz gcc-a1bab9ea96f0a1a2e0b6030237fa4434eab78972.tar.bz2 | |
check.c (gfc_check_atan2): New function.
* check.c (gfc_check_atan2): New function.
* intrinsic.c (add_functions): Use gfc_check_atan2 for ATAN2
* intrinsic.h (gfc_check_atan2): Add prototype.
From-SVN: r86628
Diffstat (limited to 'gcc/fortran/intrinsic.c')
| -rw-r--r-- | gcc/fortran/intrinsic.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/intrinsic.c b/gcc/fortran/intrinsic.c index 2784a7a..ec344c7 100644 --- a/gcc/fortran/intrinsic.c +++ b/gcc/fortran/intrinsic.c @@ -975,7 +975,7 @@ add_functions (void) make_generic ("atan", GFC_ISYM_ATAN); add_sym_2 ("atan2", 1, 1, BT_REAL, dr, - NULL, gfc_simplify_atan2, gfc_resolve_atan2, + gfc_check_atan2, gfc_simplify_atan2, gfc_resolve_atan2, y, BT_REAL, dr, 0, x, BT_REAL, dr, 0); add_sym_2 ("datan2", 1, 1, BT_REAL, dd, |