trans-types.c (gfc_get_character_type_len): : Use gfc_charlen_type_node as basic...
authorTobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
Sun, 16 Jan 2005 16:05:46 +0000 (17:05 +0100)
committerTobias Schlüter <tobi@gcc.gnu.org>
Sun, 16 Jan 2005 16:05:46 +0000 (17:05 +0100)
commit5e3b87274d2e559eb5df85800069edee8f647f2c
tree5525b0374271a7560be060f0757aaed95646b86c
parentde46b50562981de0318ae2b817e62b82c78a7659
trans-types.c (gfc_get_character_type_len): : Use gfc_charlen_type_node as basic type for the range field.

* trans-types.c (gfc_get_character_type_len): : Use
gfc_charlen_type_node as basic type for the range field.

From-SVN: r93729
gcc/fortran/ChangeLog
gcc/fortran/trans-types.c