diff options
| author | jnorris <jnorris@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-11-22 19:25:29 +0000 |
|---|---|---|
| committer | jnorris <jnorris@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-11-22 19:25:29 +0000 |
| commit | e18d05ea3edc9ba2a71966da3c39191fc09734a9 (patch) | |
| tree | 0a67ebafe157dcd6001a2472c75ce6c212f991df /gcc/fortran/openmp.c | |
| parent | 01d728a4330f09604b1a1e4fec27001765183966 (diff) | |
gcc/fortran/
* openmp.c (match_oacc_clause_gang): Fix uninitialized variable.
(gfc_resolve_oacc_declare): Fix comparision.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@230725 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/openmp.c')
| -rw-r--r-- | gcc/fortran/openmp.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gcc/fortran/openmp.c b/gcc/fortran/openmp.c index ffdce0b18480..a07cee1a0b94 100644 --- a/gcc/fortran/openmp.c +++ b/gcc/fortran/openmp.c @@ -415,7 +415,8 @@ match_oacc_clause_gang (gfc_omp_clauses *cp) static match gfc_match_oacc_clause_link (const char *str, gfc_omp_namelist **list) { - gfc_omp_namelist *head, *tail, *p; + gfc_omp_namelist *head = NULL; + gfc_omp_namelist *tail, *p; locus old_loc; char n[GFC_MAX_SYMBOL_LEN+1]; gfc_symbol *sym; @@ -4821,7 +4822,7 @@ gfc_resolve_oacc_declare (gfc_namespace *ns) for (oc = ns->oacc_declare; oc; oc = oc->next) { - for (list = 0; list <= OMP_LIST_NUM; list++) + for (list = 0; list < OMP_LIST_NUM; list++) for (n = oc->clauses->lists[list]; n; n = n->next) { n->sym->mark = 0; @@ -4846,7 +4847,7 @@ gfc_resolve_oacc_declare (gfc_namespace *ns) for (oc = ns->oacc_declare; oc; oc = oc->next) { - for (list = 0; list <= OMP_LIST_NUM; list++) + for (list = 0; list < OMP_LIST_NUM; list++) for (n = oc->clauses->lists[list]; n; n = n->next) { if (n->sym->mark) @@ -4862,7 +4863,7 @@ gfc_resolve_oacc_declare (gfc_namespace *ns) for (oc = ns->oacc_declare; oc; oc = oc->next) { - for (list = 0; list <= OMP_LIST_NUM; list++) + for (list = 0; list < OMP_LIST_NUM; list++) for (n = oc->clauses->lists[list]; n; n = n->next) n->sym->mark = 0; } |