From: Jakub Jelinek Date: Fri, 8 Nov 2019 16:48:41 +0000 (+0100) Subject: * arith.c (character2representation): Change i type to size_t. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=77b29023e12eb3e906026380549d57dfcc44b433;p=gcc.git * arith.c (character2representation): Change i type to size_t. From-SVN: r277978 --- diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 18e4c023f8a..bf1f8cf3a70 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,11 +1,16 @@ +2019-11-08 Jakub Jelinek + + * arith.c (character2representation): Change i type to size_t. + 2019-11-08 Mark Eggleston - Jim MacArthur + Jim MacArthur * arith.c (hollerith2representation): Use OPT_Wcharacter_truncation in - call to gfc_warning. Add character2representation, gfc_character2int, - gfc_character2real, gfc_character2complex and gfc_character2logical. - * arith.h: Add prototypes for gfc_character2int, gfc_character2real, - gfc_character2complex and gfc_character2logical. + call to gfc_warning. + (character2representation, gfc_character2int, gfc_character2real, + gfc_character2complex and gfc_character2logical): New. + * arith.h (gfc_character2int, gfc_character2real, gfc_character2complex, + gfc_character2logical): Declare. * expr.c (gfc_check_assign): Return true if left hand side is numeric or logical and the right hand side is character and of kind=1. * gfortran.texi: Add -fdec-char-conversions. diff --git a/gcc/fortran/arith.c b/gcc/fortran/arith.c index 10b3e5c103f..a40163e8a2d 100644 --- a/gcc/fortran/arith.c +++ b/gcc/fortran/arith.c @@ -2534,8 +2534,7 @@ hollerith2representation (gfc_expr *result, gfc_expr *src) static void character2representation (gfc_expr *result, gfc_expr *src) { - size_t src_len, result_len; - int i; + size_t src_len, result_len, i; src_len = src->value.character.length; gfc_target_expr_size (result, &result_len);