diff options
| author | Jakub Jelinek <jakub@redhat.com> | 2010-02-09 19:42:17 +0100 |
|---|---|---|
| committer | Jakub Jelinek <jakub@gcc.gnu.org> | 2010-02-09 19:42:17 +0100 |
| commit | b16be5f2c5a0f9aaf398c55c2a3802d878433731 (patch) | |
| tree | 5c149898cc33507b3d36d7f1fb8845835f6706df /gcc/fortran/module.c | |
| parent | 6f117ca583179cf2e02360d94bb0129066049a35 (diff) | |
| download | gcc-b16be5f2c5a0f9aaf398c55c2a3802d878433731.zip gcc-b16be5f2c5a0f9aaf398c55c2a3802d878433731.tar.gz gcc-b16be5f2c5a0f9aaf398c55c2a3802d878433731.tar.bz2 | |
* module.c (fix_mio_expr): Declare sym.
From-SVN: r156632
Diffstat (limited to 'gcc/fortran/module.c')
| -rw-r--r-- | gcc/fortran/module.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 36db863..0fc1921 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -2927,6 +2927,8 @@ fix_mio_expr (gfc_expr *e) } else if (e->expr_type == EXPR_FUNCTION && e->value.function.name) { + gfc_symbol *sym; + /* In some circumstances, a function used in an initialization expression, in one use associated module, can fail to be coupled to its symtree when used in a specification |