===================================================================
@@ -1877,6 +1877,12 @@
* interface.c (is_procptr_result): New function to check if an
expression is a procedure-pointer result.
(compare_actual_formal): Use it.
+
+2015_07-31
+
+ PR fortran/62242
+ * trans-array.c (gfc_add_loop_ss_code): String array constructor:
+ Don't try to convert string length unless it's constant.
^L
Copyright (C) 2015 Free Software Foundation, Inc.
===================================================================
@@ -2589,7 +2589,8 @@ gfc_add_loop_ss_code (gfc_loopinfo * loop, gfc_ss
if (expr->ts.type == BT_CHARACTER
&& ss_info->string_length == NULL
&& expr->ts.u.cl
- && expr->ts.u.cl->length)
+ && expr->ts.u.cl->length
+ && expr->ts.u.cl->length->expr_type == EXPR_CONSTANT)
{
gfc_init_se (&se, NULL);
gfc_conv_expr_type (&se, expr->ts.u.cl->length,