Committed to placate the masses.
2015-11-25 Steven G. Kargl <ka...@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
