This is the mail archive of the
gcc-patches@gcc.gnu.org
mailing list for the GCC project.
Re: [fortran-exp, patch] get_expr code cleanup, part II
- From: Bud Davis <bdavis9659 at sbcglobal dot net>
- To: fortran at gcc dot gnu dot org, Daniel Franke <franke dot daniel at gmail dot com>
- Cc: gcc-patches at gcc dot gnu dot org
- Date: Mon, 4 Jan 2010 11:51:42 -0800 (PST)
- Subject: Re: [fortran-exp, patch] get_expr code cleanup, part II
tmp_sym->value->ts.is_c_interop = 1;
tmp_sym->value->ts.is_iso_c = 1;
tmp_sym->value->value.character.length = 1;
- tmp_sym->value->value.character.string = gfc_get_wide_string (2);
tmp_sym->value->value.character.string[0]
= (gfc_char_t) c_interop_kinds_table[s].value;
- tmp_sym->value->value.character.string[1] = '\0';
tmp_sym->ts.u.cl = gfc_new_charlen (gfc_current_ns, NULL);
did you really mean to delete these 2 lines ?
--bud