aboutsummaryrefslogtreecommitdiff
path: root/gcc/fortran/openmp.c
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/fortran/openmp.c')
-rw-r--r--gcc/fortran/openmp.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c
index 569360f79b3..28f1cc24dfd 100644
--- a/gcc/fortran/openmp.c
+++ b/gcc/fortran/openmp.c
@@ -397,14 +397,14 @@ gfc_match_omp_clauses (gfc_omp_clauses **cp, int mask)
if (p)
{
gfc_error (p);
- collapse = 1;
+ collapse = 1;
}
else if (collapse <= 0)
{
gfc_error ("COLLAPSE clause argument not constant positive integer at %C");
collapse = 1;
}
- c->collapse = collapse;
+ c->collapse = collapse;
gfc_free_expr (cexpr);
continue;
}