| commit | a67189d4904ebdae45829558f5ddd6f628e5c910 | |
| author | Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> | |
| Sat, 11 Sep 2010 16:34:20 +0000 (11 16:34 +0000) | ||
| committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | |
| Sat, 11 Sep 2010 16:34:20 +0000 (11 16:34 +0000) | ||
| tree | 615287f513f3d8f71931077bb3135b6eaeffadc3 | treesnapshot (tar.gz zip) |
| parent | 616f12900dccc06a528586f8c7f969012d1e50a1 | commitdiff |
mathbuiltins.def: Do not defined huge_val built-in.
* mathbuiltins.def: Do not defined huge_val built-in.
* trans-const.c (gfc_build_inf_or_huge): New function.
* trans-const.h (gfc_build_inf_or_huge): New prototype.
* f95-lang.c (gfc_init_builtin_functions): Don't defined
huge_val built-ins.
* trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): We don't
have functions of type (*) (void) anymore.
(gfc_conv_intrinsic_minmaxloc): Call gfc_build_inf_or_huge.
(gfc_conv_intrinsic_nearest): Call gfc_build_inf_or_huge instead
of generating a call to huge_val().
From-SVN: r164216
* mathbuiltins.def: Do not defined huge_val built-in.
* trans-const.c (gfc_build_inf_or_huge): New function.
* trans-const.h (gfc_build_inf_or_huge): New prototype.
* f95-lang.c (gfc_init_builtin_functions): Don't defined
huge_val built-ins.
* trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): We don't
have functions of type (*) (void) anymore.
(gfc_conv_intrinsic_minmaxloc): Call gfc_build_inf_or_huge.
(gfc_conv_intrinsic_nearest): Call gfc_build_inf_or_huge instead
of generating a call to huge_val().
From-SVN: r164216