[Patch, Fortran] Preparatory patch to change charlen's kind type

[Andre Vehreschild]

Hi all,

during hacking in gfortran I found, that for unlimited polymorphic types the
size type of a char array stored is hard coded to be 4. This small patch
resolves this by using the better suited constant: gfc_charlen_int_kind. This
will make the move to larger strings easier.

Bootstrapped and regtested on x86_64-linux/F23. Ok for trunk?

Regards,
        Andre

diff --git a/gcc/fortran/class.c b/gcc/fortran/class.c
index 6d324a6..e110f2c 100644
--- a/gcc/fortran/class.c
+++ b/gcc/fortran/class.c
@@ -707,7 +707,7 @@ gfc_build_class_symbol (gfc_typespec *ts, symbol_attribute
*attr, if (!gfc_add_component (fclass, "_len", &c))
            return false;
          c->ts.type = BT_INTEGER;
-         c->ts.kind = 4;
+         c->ts.kind = gfc_charlen_int_kind;
          c->attr.access = ACCESS_PRIVATE;
          c->attr.artificial = 1;
        }

-- 
Andre Vehreschild * Email: vehre ad gmx dot de