aboutsummaryrefslogtreecommitdiff
path: root/gcc/f
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/f')
-rw-r--r--gcc/f/ChangeLog2
-rw-r--r--gcc/f/com.c2
-rw-r--r--gcc/f/intdoc.in2
-rw-r--r--gcc/f/intdoc.texi2
-rw-r--r--gcc/f/lex.c2
-rw-r--r--gcc/f/sta.c2
6 files changed, 6 insertions, 6 deletions
diff --git a/gcc/f/ChangeLog b/gcc/f/ChangeLog
index b3ffe65..5b5b0fe 100644
--- a/gcc/f/ChangeLog
+++ b/gcc/f/ChangeLog
@@ -2375,7 +2375,7 @@ Thu Nov 2 03:58:17 1995 Craig Burley (burley@gnu.ai.mit.edu)
wrap every new eval of lhs in save_expr() so it is clear to
back end that MULT_EXPR(lhs,lhs) has identical operands,
otherwise for an rhs like 32767 it generates around 65K pseudo
- registers, which which stupid_life_analysis cannot cope
+ registers, with which stupid_life_analysis cannot cope
(due to reg_renumber in regs.h being `short *' instead of
`int *').
diff --git a/gcc/f/com.c b/gcc/f/com.c
index 1d6c0ea..75b7274 100644
--- a/gcc/f/com.c
+++ b/gcc/f/com.c
@@ -15217,7 +15217,7 @@ pushdecl (x)
typedef struct S MY_TYPE; MY_TYPE object;
Later parts of the compiler might only know that `object' was of type
- `struct S' if if were not for code just below. With this code
+ `struct S' if it were not for code just below. With this code
however, later parts of the compiler see something like:
struct S' == struct S typedef struct S' MY_TYPE; struct S' object;
diff --git a/gcc/f/intdoc.in b/gcc/f/intdoc.in
index f8c9b82..1ef6a94 100644
--- a/gcc/f/intdoc.in
+++ b/gcc/f/intdoc.in
@@ -2463,7 +2463,7 @@ Causes external subroutine @var{@2@} to be executed after a delay of
@var{@1@} seconds by using @code{alarm(1)} to set up a signal and
@code{signal(2)} to catch it.
If @var{@3@} is supplied, it will be
-returned with the the number of seconds remaining until any previously
+returned with the number of seconds remaining until any previously
scheduled alarm was due to be delivered, or zero if there was no
previously scheduled alarm.
@xref{Signal Intrinsic (subroutine)}.
diff --git a/gcc/f/intdoc.texi b/gcc/f/intdoc.texi
index cf48c4b..74153db 100644
--- a/gcc/f/intdoc.texi
+++ b/gcc/f/intdoc.texi
@@ -1178,7 +1178,7 @@ Causes external subroutine @var{Handler} to be executed after a delay of
@var{Seconds} seconds by using @code{alarm(1)} to set up a signal and
@code{signal(2)} to catch it.
If @var{Status} is supplied, it will be
-returned with the the number of seconds remaining until any previously
+returned with the number of seconds remaining until any previously
scheduled alarm was due to be delivered, or zero if there was no
previously scheduled alarm.
@xref{Signal Intrinsic (subroutine)}.
diff --git a/gcc/f/lex.c b/gcc/f/lex.c
index dbf79dd..1a0913b 100644
--- a/gcc/f/lex.c
+++ b/gcc/f/lex.c
@@ -1059,7 +1059,7 @@ ffelex_get_directive_line_ (char **text, FILE *finput)
else
if (c == '\'' || c == '"')
looking_for = c; /* Don't stop buffering until we see another
- another one of these (or an EOF). */
+ one of these (or an EOF). */
/* Handle backslash. */
char_escaped = (c == '\\' && ! char_escaped);
diff --git a/gcc/f/sta.c b/gcc/f/sta.c
index c7bd664..e26fa69 100644
--- a/gcc/f/sta.c
+++ b/gcc/f/sta.c
@@ -1937,7 +1937,7 @@ ffesta_zero (ffelexToken t)
isn't enough, because then typing "GOTO" instead of "BLAH" above
doesn't work -- the statement is confirmed (we know the user
attempted a GOTO) but ffestc hasn't seen it. So, instead, just
- always tell ffestc to do "any" statement it needs to to reset. */
+ always tell ffestc to do "any" statement it needs to reset. */
if (!ffesta_is_inhibited_
&& ffesta_seen_first_exec)