[gfortran, committed] Spelling fixes in resolve_entries

[Tobias Schlüter <tobias dot schlueter at physik dot uni-muenchen dot de>]

Paul Brook wrote:
> We already have an ordering dependency. We must resolve all contained 
> functions (including their entry points argument lists) before resolve their 
> bodies.
> 

Actually looking at resolve_entries, I felt compelled to fix a few spelling
mistakes, and a misunderstandable comment. When diffing, I saw that I forgot
to commit the ChangeLog in my previous commit, so this is included in this
commit. What I committed can be seen below. I verified that the compiler still
builds.

- Tobi

Index: ChangeLog
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/ChangeLog,v
retrieving revision 1.166
diff -u -p -r1.166 ChangeLog
--- ChangeLog   24 Aug 2004 16:39:34 -0000      1.166
+++ ChangeLog   24 Aug 2004 16:54:32 -0000
@@ -1,3 +1,11 @@
+2004-08-24  Tobias Schlueter  <tobias.schlueter@physik.uni-muenchen.de>
+
+       * 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.
+
+       * resolve.c (resolve_entries): Fix a bunch of comment typos.
+
 2004-08-24  Nathan Sidwell  <nathan@codesourcery.com>

        * fortran/f95-lang.c (gfc_init_decl_processing): Adjust
Index: resolve.c
===================================================================
RCS file: /cvs/gcc/gcc/gcc/fortran/resolve.c,v
retrieving revision 1.13
retrieving revision 1.15
diff -u -p -r1.13 -r1.15
--- resolve.c   23 Aug 2004 21:53:14 -0000      1.13
+++ resolve.c   24 Aug 2004 16:58:33 -0000      1.15
@@ -344,7 +344,7 @@ resolve_entries (gfc_namespace * ns)
   if (ns->proc_name->attr.entry_master)
     return;

-  /* If this isn't a procedure something as gone horribly wrong.   */
+  /* If this isn't a procedure something has gone horribly wrong.   */
   assert (ns->proc_name->attr.flavor == FL_PROCEDURE);

   /* Remember the current namespace.  */
@@ -369,8 +369,8 @@ resolve_entries (gfc_namespace * ns)

   /* Create a new symbol for the master function.  */
   /* Give the internal function a unique name (within this file).
-     Also include teh function name so the user has some hope of figuring
-     out whats going on.  */
+     Also include the function name so the user has some hope of figuring
+     out what is going on.  */
   snprintf (name, GFC_MAX_SYMBOL_LEN, "master.%d.%s",
            master_count++, ns->proc_name->name);
   name[GFC_MAX_SYMBOL_LEN] = '\0';
@@ -392,10 +392,10 @@ resolve_entries (gfc_namespace * ns)
   for (el = ns->entries; el; el = el->next)
     merge_argument_lists (proc, el->sym->formal);

-  /* And use it for the function body.  */
+  /* Use the master function for the function body.  */
   ns->proc_name = proc;

-  /* FInalize the new symbols.  */
+  /* Finalize the new symbols.  */
   gfc_commit_symbols ();

   /* Restore the original namespace.  */