re PR fortran/60677 (FAIL: gfortran.dg/ichar_3.f90 -O (test for excess errors))

fortran/
        PR fortran/60677
        * trans-intrinsic.c (gfc_conv_intrinsic_ichar): Enlarge argument
        list buffer.

From-SVN: r208913

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index cc683ca4bcc3ad97bace17bc243590e1a71194e8..1bd4e475b3529d81430b6ac0528b70882ebf2ba3 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,4 +1,10 @@
-2014-04-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
+2014-03-28  Mikael Morin  <mikael@gcc.gnu.org>
+
+       PR fortran/60677
+       * trans-intrinsic.c (gfc_conv_intrinsic_ichar): Enlarge argument
+       list buffer.
+
+2014-03-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
 
        PR fortran/60522
        * frontend-passes.c (cfe_code):  Do not walk subtrees

diff --git a/gcc/fortran/trans-intrinsic.c b/gcc/fortran/trans-intrinsic.c
index e21d52fece9d4bfdda138c6b2aec9cd575fd015b..070b64ed97503f2a00ae7ea3e0c9bd0ff1628c2a 100644 (file)
--- a/gcc/fortran/trans-intrinsic.c
+++ b/gcc/fortran/trans-intrinsic.c
@@ -4687,7 +4687,7 @@ gfc_conv_intrinsic_index_scan_verify (gfc_se * se, gfc_expr * expr,
 static void
 gfc_conv_intrinsic_ichar (gfc_se * se, gfc_expr * expr)
 {
-  tree args[2], type, pchartype;
+  tree args[3], type, pchartype;
   int nargs;
 
   nargs = gfc_intrinsic_argument_list_length (expr);