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: r208935

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 35a1bf3837acb8916bc653bc71a58361c83d5605..11cbdde933b373a4dbc4b74aef80a3c1e3519f92 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,4 +1,10 @@
-2014-04-29  Thomas Koenig  <tkoenig@gcc.gnu.org>
+2014-03-29  Mikael Morin  <mikael@gcc.gnu.org>
+
+       PR fortran/60677
+       * trans-intrinsic.c (gfc_conv_intrinsic_ichar): Enlarge argument
+       list buffer.
+
+2014-03-29  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 89dbb012f86abcef1e829cc43ae9358f7fa886de..b8752995fca1111d158278b97847d9d57125a8ae 100644 (file)
--- a/gcc/fortran/trans-intrinsic.c
+++ b/gcc/fortran/trans-intrinsic.c
@@ -4664,7 +4664,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);