This is the mail archive of the fortran@gcc.gnu.org mailing list for the GNU Fortran project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

Re: [gfortran, committed] Fix type-safety issues was: Re: [gfortran] Fix PR 20178: Implement g77 / f2c calling conventions


Hi, Tobi
This patch seems not to be committed to 4.0 branch.

Best Regards,
Feng Wang

> 
> Index: ChangeLog
> ===================================================================
> RCS file: /cvs/gcc/gcc/gcc/fortran/ChangeLog,v
> retrieving revision 1.343
> diff -u -p -r1.343 ChangeLog
> --- ChangeLog   4 Mar 2005 21:03:28 -0000       1.343
> +++ ChangeLog   5 Mar 2005 19:59:20 -0000
> @@ -1,3 +1,8 @@
> +2005-03-05  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
> +
> +       * trans-const.c (gfc_conv_constant_to_tree): Use correct tree
> +       type for COMPLEX constants.
> +
>  2005-03-04  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
> 
>         PR fortran/19673
> Index: trans-const.c
> ===================================================================
> RCS file: /cvs/gcc/gcc/gcc/fortran/trans-const.c,v
> retrieving revision 1.21
> diff -u -p -r1.21 trans-const.c
> --- trans-const.c       22 Jan 2005 00:29:33 -0000      1.21
> +++ trans-const.c       5 Mar 2005 19:59:20 -0000
> @@ -316,7 +316,8 @@ gfc_conv_constant_to_tree (gfc_expr * ex
>         tree imag = gfc_conv_mpfr_to_tree (expr->value.complex.i,
>                                           expr->ts.kind);
> 
> -       return build_complex (NULL_TREE, real, imag);
> +       return build_complex (gfc_typenode_for_spec (&expr->ts),
> +                             real, imag);
>        }
> 
>      case BT_CHARACTER:
> 

_________________________________________________________
Do You Yahoo!?
150万曲MP3疯狂搜,带您闯入音乐殿堂
http://music.yisou.com/
美女明星应有尽有,搜遍美图、艳图和酷图
http://image.yisou.com
1G就是1000兆,雅虎电邮自助扩容!
http://cn.rd.yahoo.com/mail_cn/tag/1g/*http://cn.mail.yahoo.com/event/mail_1g/


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]