This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
PR fortran/13434
- From: "HUANG Chun" <chunhuang73 at hotmail dot com>
- To: fortran at gcc dot gnu dot org
- Date: Wed, 31 Dec 2003 08:25:54 +0800
- Subject: PR fortran/13434
- Bcc:
Hi,
Bug 13434 is fixed.
Huang Chun
========
2003-12-29 Huang Chun <chunhuang73@hotmail.com>
PR fortran/13434
* trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Fixed bug in
minval/maxval.
*** trans-intrinsic.c.old Tue Dec 30 09:36:14 2003
--- trans-intrinsic.c Mon Dec 29 16:26:03 2003
*************** gfc_conv_intrinsic_minmaxval (gfc_se * s
*** 1631,1637 ****
if (maskss)
{
/* We enclose the above in if (mask) {...}. */
! tmp = build (COND_EXPR, maskse.expr, tmp, build_empty_stmt ());
}
gfc_add_expr_to_block (&body, tmp);
--- 1631,1637 ----
if (maskss)
{
/* We enclose the above in if (mask) {...}. */
! tmp = build_v (COND_EXPR, maskse.expr, tmp, build_empty_stmt ());
}
gfc_add_expr_to_block (&body, tmp);
_________________________________________________________________
与联机的朋友进行交流,请使用 MSN Messenger: http://messenger.msn.com/cn