aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/parse.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/parse.c')
-rw-r--r--gcc/fortran/parse.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c
index e57e10d..64d8c33 100644
--- a/gcc/fortran/parse.c
+++ b/gcc/fortran/parse.c
@@ -2189,7 +2189,7 @@ loop:
gfc_current_block ()->ts.kind = 0;
/* Keep the derived type; if it's bad, it will be discovered later. */
- if (!(ts->type = BT_DERIVED && ts->derived))
+ if (!(ts->type == BT_DERIVED && ts->derived))
ts->type = BT_UNKNOWN;
}