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') 

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> 2012-01-28 Tobias Burnus <burnus@net-b.de>
PR fortran/51972 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 /* Resolve an actual argument list. Most of the time, this is just
resolving the expressions in the list. resolving the expressions in the list.
The exception is that we sometimes have to decide whether arguments The exception is that we sometimes have to decide whether arguments