Skip to content

R
riscv-gcc-1
Commit 3ba43c5f by Kaveh R. Ghazi Committed by Kaveh Ghazi
Options

module.c (mio_expr): Avoid -Wcast-qual warning. 

	* module.c (mio_expr): Avoid -Wcast-qual warning.

From-SVN: r128854
parent d1a16d63
Showing with 6 additions and 2 deletions
gcc/fortran/ChangeLog
2007-09-27 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
* module.c (mio_expr): Avoid -Wcast-qual warning.
2007-09-27 Tobias Schlter <tobi@gcc.gnu.org> 2007-09-27 Tobias Schlter <tobi@gcc.gnu.org>
* arith.c (reduce_binary_aa): Fix capitalization. * arith.c (reduce_binary_aa): Fix capitalization.
......
gcc/fortran/module.c
...@@ -2819,7 +2819,7 @@ mio_expr (gfc_expr **ep) ...@@ -2819,7 +2819,7 @@ mio_expr (gfc_expr **ep)
case EXPR_SUBSTRING: case EXPR_SUBSTRING:
e->value.character.string 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); mio_ref_list (&e->ref);
break; break;
...@@ -2854,7 +2854,7 @@ mio_expr (gfc_expr **ep) ...@@ -2854,7 +2854,7 @@ mio_expr (gfc_expr **ep)
case BT_CHARACTER: case BT_CHARACTER:
mio_integer (&e->value.character.length); mio_integer (&e->value.character.length);
e->value.character.string e->value.character.string
= (char *) mio_allocated_string (e->value.character.string); = CONST_CAST (char *, mio_allocated_string (e->value.character.string));
break; break;
default: default:
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment