aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/trans-expr.c
diff options
context:
space:
mode:
authorMike Stump <mrs@gcc.gnu.org>2011-04-10 18:46:45 +0000
committerMike Stump <mrs@gcc.gnu.org>2011-04-10 18:46:45 +0000
commitdd5a833e6e86e0ed85af6e48aa460ebfc4665f5d (patch)
treebf95262adeb1e48387900226345da1050170321b /gcc/fortran/trans-expr.c
parent4b9726d48cc7eea7e51b51e00e3720104cd2774f (diff)
downloadgcc-dd5a833e6e86e0ed85af6e48aa460ebfc4665f5d.zip
gcc-dd5a833e6e86e0ed85af6e48aa460ebfc4665f5d.tar.gz
gcc-dd5a833e6e86e0ed85af6e48aa460ebfc4665f5d.tar.bz2
Remove doubled up words.
From-SVN: r172247
Diffstat (limited to 'gcc/fortran/trans-expr.c')
-rw-r--r--gcc/fortran/trans-expr.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/trans-expr.c b/gcc/fortran/trans-expr.c
index 41ee5ee..dc9168a 100644
--- a/gcc/fortran/trans-expr.c
+++ b/gcc/fortran/trans-expr.c
@@ -3600,7 +3600,7 @@ gfc_conv_procedure_call (gfc_se * se, gfc_symbol * sym,
/* If there are alternate return labels, function type should be
integer. Can't modify the type in place though, since it can be shared
with other functions. For dummy arguments, the typing is done to
- to this result, even if it has to be repeated for each call. */
+ this result, even if it has to be repeated for each call. */
if (has_alternate_specifier
&& TREE_TYPE (TREE_TYPE (TREE_TYPE (se->expr))) != integer_type_node)
{