diff options
| author | Tobias Burnus <burnus@net-b.de> | 2011-12-10 22:15:37 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2011-12-10 22:15:37 +0100 |
| commit | 9be1227bfa90c86cf573b448a3a410e0c606852c (patch) | |
| tree | 95169dec7f74bcbe8a52afbdd0a0f00a517c3ef7 | |
| parent | 5aebfdad5836fb769478dfb68e280e29f0d00e5e (diff) | |
| download | gcc-9be1227bfa90c86cf573b448a3a410e0c606852c.zip gcc-9be1227bfa90c86cf573b448a3a410e0c606852c.tar.gz gcc-9be1227bfa90c86cf573b448a3a410e0c606852c.tar.bz2 | |
trans-decl.c (add_argument_checking): Fix syntax.
2011-12-10 Tobias Burnus <burnus@net-b.de>
* trans-decl.c (add_argument_checking): Fix syntax.
From-SVN: r182194
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/trans-decl.c | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index b7df506..a1b18c0 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,4 +1,8 @@ 2011-12-10 Tobias Burnus <burnus@net-b.de> + + * trans-decl.c (add_argument_checking): Fix syntax. + +2011-12-10 Tobias Burnus <burnus@net-b.de> Kai Tietz <ktietz@redhat.com> * trans-decl.c (add_argument_checking): Check ts.deferred earlier. diff --git a/gcc/fortran/trans-decl.c b/gcc/fortran/trans-decl.c index 4ea4e7a..c43bb80 100644 --- a/gcc/fortran/trans-decl.c +++ b/gcc/fortran/trans-decl.c @@ -4673,7 +4673,7 @@ add_argument_checking (stmtblock_t *block, gfc_symbol *sym) for (formal = sym->formal; formal; formal = formal->next) if (formal->sym && formal->sym->ts.type == BT_CHARACTER - && !fsym->ts.deferred) + && !formal->sym->ts.deferred) { enum tree_code comparison; tree cond; |