diff options
Diffstat (limited to 'gcc/fortran/decl.c')
-rw-r--r-- | gcc/fortran/decl.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/gcc/fortran/decl.c b/gcc/fortran/decl.c index 7239158..947e4f8 100644 --- a/gcc/fortran/decl.c +++ b/gcc/fortran/decl.c @@ -3066,8 +3066,7 @@ gfc_match_old_kind_spec (gfc_typespec *ts) if (flag_real4_kind == 16) ts->kind = 16; } - - if (ts->kind == 8) + else if (ts->kind == 8) { if (flag_real8_kind == 4) ts->kind = 4; @@ -3246,8 +3245,7 @@ close_brackets: if (flag_real4_kind == 16) ts->kind = 16; } - - if (ts->kind == 8) + else if (ts->kind == 8) { if (flag_real8_kind == 4) ts->kind = 4; |