diff options
| author | Alessandro Fanfarillo <fanfarillo.gcc@gmail.com> | 2015-12-15 06:19:21 -0700 |
|---|---|---|
| committer | Alessandro Fanfarillo <afanfa@gcc.gnu.org> | 2015-12-15 06:19:21 -0700 |
| commit | 1fceb21584e9176c22775f00641ee1fcb8c62798 (patch) | |
| tree | 96efb8f7596c53012fc69bb52476b6843ef3a99b /gcc/fortran/resolve.c | |
| parent | 4a414de84a8e51b60b0be0c6c3ad9c33f7310d92 (diff) | |
| download | gcc-1fceb21584e9176c22775f00641ee1fcb8c62798.zip gcc-1fceb21584e9176c22775f00641ee1fcb8c62798.tar.gz gcc-1fceb21584e9176c22775f00641ee1fcb8c62798.tar.bz2 | |
Fix ICE for coarray Critical inside module procedure
From-SVN: r231649
Diffstat (limited to 'gcc/fortran/resolve.c')
| -rw-r--r-- | gcc/fortran/resolve.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/fortran/resolve.c b/gcc/fortran/resolve.c index 65a2b7f..3988b3c 100644 --- a/gcc/fortran/resolve.c +++ b/gcc/fortran/resolve.c @@ -8852,6 +8852,7 @@ resolve_critical (gfc_code *code) symtree->n.sym->as->cotype = AS_EXPLICIT; symtree->n.sym->as->lower[0] = gfc_get_int_expr (gfc_default_integer_kind, NULL, 1); + gfc_commit_symbols(); } |