diff options
| author | Kaveh R. Ghazi <ghazi@caip.rutgers.edu> | 2007-09-28 00:41:05 +0000 |
|---|---|---|
| committer | Kaveh Ghazi <ghazi@gcc.gnu.org> | 2007-09-28 00:41:05 +0000 |
| commit | 3ba43c5f0c039df452c8f33071f36ce7dee4a70c (patch) | |
| tree | 759d52de92ef89a0da9aa158206e448f35bed7a0 /gcc/fortran/module.c | |
| parent | d1a16d63f1cc9dffa883a8758ab253a6e20042f2 (diff) | |
| download | gcc-3ba43c5f0c039df452c8f33071f36ce7dee4a70c.zip gcc-3ba43c5f0c039df452c8f33071f36ce7dee4a70c.tar.gz gcc-3ba43c5f0c039df452c8f33071f36ce7dee4a70c.tar.bz2 | |
module.c (mio_expr): Avoid -Wcast-qual warning.
* module.c (mio_expr): Avoid -Wcast-qual warning.
From-SVN: r128854
Diffstat (limited to 'gcc/fortran/module.c')
| -rw-r--r-- | gcc/fortran/module.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 3418afa..78bbac8 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -2819,7 +2819,7 @@ mio_expr (gfc_expr **ep) case EXPR_SUBSTRING: e->value.character.string - = (char *) mio_allocated_string (e->value.character.string); + = CONST_CAST (char *, mio_allocated_string (e->value.character.string)); mio_ref_list (&e->ref); break; @@ -2854,7 +2854,7 @@ mio_expr (gfc_expr **ep) case BT_CHARACTER: mio_integer (&e->value.character.length); e->value.character.string - = (char *) mio_allocated_string (e->value.character.string); + = CONST_CAST (char *, mio_allocated_string (e->value.character.string)); break; default: |