diff options
author | ghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-06-05 16:20:25 +0000 |
---|---|---|
committer | ghazi <ghazi@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-06-05 16:20:25 +0000 |
commit | c3cfad903dd04f113aec724a7b92587d76b038fa (patch) | |
tree | 0838738db151716477069c9bdee9e002cb818036 /gcc/fortran/simplify.c | |
parent | f63d3ecc34e8b969b3c940f14e725815c1ef3215 (diff) | |
download | gcc-c3cfad903dd04f113aec724a7b92587d76b038fa.tar.gz |
* builtins.c (do_mpc_ckconv, do_mpc_arg1): Use
mpc_realref/mpc_imagref instead of MPC_RE/MPC_IM.
fortran:
* simplify.c (call_mpc_func): Use mpc_realref/mpc_imagref
instead of MPC_RE/MPC_IM.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@148213 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/simplify.c')
-rw-r--r-- | gcc/fortran/simplify.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/simplify.c b/gcc/fortran/simplify.c index 98df0edd958..fea1b91779f 100644 --- a/gcc/fortran/simplify.c +++ b/gcc/fortran/simplify.c @@ -223,8 +223,8 @@ call_mpc_func (mpfr_ptr result_re, mpfr_ptr result_im, mpc_init2 (c, mpfr_get_default_prec()); mpc_set_fr_fr (c, input_re, input_im, GFC_MPC_RND_MODE); func (c, c, GFC_MPC_RND_MODE); - mpfr_set (result_re, MPC_RE (c), GFC_RND_MODE); - mpfr_set (result_im, MPC_IM (c), GFC_RND_MODE); + mpfr_set (result_re, mpc_realref (c), GFC_RND_MODE); + mpfr_set (result_im, mpc_imagref (c), GFC_RND_MODE); mpc_clear (c); } #endif |