OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR fortran/52038 (fortran bootstrap failure: no previous prototype for 'symbol_as')

Browse Source 
2012-01-29  Tobias Burnus  <burnus@net-b.de>

        PR fortran/52038
        * resolve.c (symbol_as): Remove unused, accidentally
        added function.

From-SVN: r183675
This commit is contained in:
Tobias Burnus 2012-01-29 12:56:18 +01:00 committed by Tobias Burnus
parent 319191b93c
commit ae98156eae
2 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/fortran/ChangeLog
View File

@ -1,3 +1,9 @@
2012-01-29 Tobias Burnus <burnus@net-b.de>
PR fortran/52038
* resolve.c (symbol_as): Remove unused, accidentally
added function.
2012-01-28 Tobias Burnus <burnus@net-b.de>
PR fortran/51972

10
gcc/fortran/resolve.c
View File

@ -1582,16 +1582,6 @@ resolve_procedure_expression (gfc_expr* expr)
}
gfc_array_spec *
symbol_as (gfc_symbol *sym)
{
if (sym->ts.type == BT_CLASS && sym->attr.class_ok)
return CLASS_DATA (sym)->as;
else
return sym->as;
}
/* Resolve an actual argument list. Most of the time, this is just
resolving the expressions in the list.
The exception is that we sometimes have to decide whether arguments