[PATCH, committed] PR fortran/PR68227

Steve Kargl sgk@troutmask.apl.washington.edu
Wed Nov 25 15:16:00 GMT 2015


Committed to placate the masses.

2015-11-25  Steven G. Kargl  <kargl@gcc.gnu.org>

        PR fortran/68227
        * trans-stmt.c (gfc_do_allocate): Convert gcc_assert argument into
        into part of conditional statement.

Index: gcc/gcc/gcc/fortran/trans-stmt.c
===================================================================
--- gcc/gcc/gcc/fortran/trans-stmt.c    (revision 230851)
+++ gcc/gcc/gcc/fortran/trans-stmt.c    (working copy)
@@ -3125,9 +3125,8 @@ gfc_do_allocate (tree bytesize, tree siz
 
   type = build_range_type (gfc_array_index_type, gfc_index_zero_node, tmp);
   type = build_array_type (elem_type, type);
-  if (gfc_can_put_var_on_stack (bytesize))
+  if (gfc_can_put_var_on_stack (bytesize) && INTEGER_CST_P (size))
     {
-      gcc_assert (INTEGER_CST_P (size));
       tmpvar = gfc_create_var (type, "temp");
       *pdata = NULL_TREE;
     }

-- 
Steve



More information about the Gcc-patches mailing list