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

Remove dead wood from trans-expr.c 

From-SVN: r241472
This commit is contained in:
Paul Thomas 2016-10-24 11:45:17 +00:00
parent e77cf8c6d6
commit c101fad870
1 changed files with 0 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
gcc/fortran/trans-expr.c
View File

@ -1508,27 +1508,6 @@ gfc_trans_class_init_assign (gfc_code *code)
}
/* Return the backend_decl for the vtable of an arbitrary typespec
and the vtable symbol. */
tree
gfc_get_vtable_decl (gfc_typespec *ts, gfc_symbol **vtab)
{
gfc_symbol *vtable = gfc_find_vtab (ts);
gcc_assert (vtable != NULL);
if (vtab != NULL)
*vtab = vtable;
if (vtable->backend_decl == NULL_TREE)
return gfc_get_symbol_decl (vtable);
else
return vtable->backend_decl;
}
/* Translate an assignment to a CLASS object
(pointer or ordinary assignment). */
/* End of prototype trans-class.c */