mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-02-02 21:30:16 +08:00
Code Issues Packages Projects Releases Wiki Activity

trans-decl.c (build_function_decl): Fix spelling in comment.

Browse Source 
* trans-decl.c (build_function_decl): Fix spelling in comment.
(build_entry_thunks): Remove code with no function.
(gfc_build_intrinsic_function_decls): Remove empty line.

From-SVN: r86494
This commit is contained in:
Tobias Schlüter 2004-08-24 18:43:26 +02:00
parent 8c1d6d62a6
commit ae51017be0
1 changed files with 1 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gcc/fortran/trans-decl.c
View File

@ -1050,7 +1050,7 @@ build_function_decl (gfc_symbol * sym)
DECL_CONTEXT (fndecl) = current_function_decl;
DECL_EXTERNAL (fndecl) = 0;
/* This specifies if a function is globaly visible, i.e. it is
/* This specifies if a function is globally visible, i.e. it is
the opposite of declaring static in C. */
if (DECL_CONTEXT (fndecl) == NULL_TREE
&& !sym->attr.entry_master)
@ -1335,11 +1335,6 @@ build_entry_thunks (gfc_namespace * ns)
/* This should always be a toplevel function. */
assert (current_function_decl == NULL_TREE);
/* Remember the master function argument decls. */
for (formal = ns->proc_name->formal; formal; formal = formal->next)
{
}
for (el = ns->entries; el; el = el->next)
{
thunk_sym = el->sym;
@ -1661,7 +1656,6 @@ gfc_build_intrinsic_function_decls (void)
2, pvoid_type_node,
pvoid_type_node);
/* Power functions. */
{
tree type;