Hi,

I just committed the patch below as obvious.

Index: ChangeLog
===================================================================
--- ChangeLog   (revision 257256)
+++ ChangeLog   (working copy)
@@ -1,5 +1,10 @@
 2018-01-31  Janne Blomqvist  <j...@gcc.gnu.org>

+       * trans-const.c (gfc_conv_string_init): Use gfc_charlen_t instead
+       of int for slen.
+
+2018-01-31  Janne Blomqvist  <j...@gcc.gnu.org>
+
        PR fortran/78534
        * trans-expr.c (fill_with_spaces): Use memset instead of
        generating loop.
Index: trans-const.c
===================================================================
--- trans-const.c       (revision 257256)
+++ trans-const.c       (working copy)
@@ -141,7 +141,7 @@ gfc_conv_string_init (tree length, gfc_e
 {
   gfc_char_t *s;
   HOST_WIDE_INT len;
-  int slen;
+  gfc_charlen_t slen;
   tree str;
   bool free_s = false;


-- 
Janne Blomqvist

Reply via email to