Patchwork [Ada] Fix some typos in comments

login
register
mail settings
Submitter oliver.kellogg@t-online.de
Date May 26, 2012, 8:07 p.m.
Message ID <1SYNGW-0yKaHo0@fwd11.aul.t-online.de>
Download mbox | patch
Permalink /patch/161506/
State New
Headers show

Comments

oliver.kellogg@t-online.de - May 26, 2012, 8:07 p.m.
Hello,

I happened to notice these typos but I don't have commit rights.
Thanks to whoever might pick it up.

-- Oliver

Patch

2012-05-26  Oliver Kellogg  <okellogg@users.sourceforge.net>

	* alloc.ads, exp_dbug.adb, gcc-interface/misc.c, lib.ads, lib-xref.adb,
	lib-xref.ads, sem_ch10.adb, sem_ch12.adb, sem_res.ads, table.ads:
	Fix typo.

Index: lib.ads
===================================================================
--- lib.ads	(revision 187915)
+++ lib.ads	(working copy)
@@ -66,7 +66,7 @@ 
 
    --    (a) Corresponding spec for a body
    --    (b) Parent spec of a child library spec
-   --    (d) With'ed specs
+   --    (c) With'ed specs
    --    (d) Parent body of a subunit
    --    (e) Subunits corresponding to any specified stubs
    --    (f) Bodies of inlined subprograms that are called
@@ -227,7 +227,7 @@ 
    --  A subprogram body (in an adb file) may stand for both a spec and a body.
    --  A simple model (and one that was adopted through version 2.07) is simply
    --  to assume that such an adb file acts as its own spec if no ads file is
-   --  is present.
+   --  present.
 
    --  However, this is not correct. RM 10.1.4(4) requires that such a body
    --  act as a spec unless a subprogram declaration of the same name is
Index: table.ads
===================================================================
--- table.ads	(revision 187915)
+++ table.ads	(working copy)
@@ -144,7 +144,7 @@ 
 
       function Last return Table_Index_Type;
       pragma Inline (Last);
-      --  Returns the current value of the last used entry in the table, which
+      --  Returns the current index of the last used entry in the table, which
       --  can then be used as a subscript for Table. Note that the only way to
       --  modify Last is to call the Set_Last procedure. Last must always be
       --  used to determine the logically last entry.
Index: sem_ch10.adb
===================================================================
--- sem_ch10.adb	(revision 187915)
+++ sem_ch10.adb	(working copy)
@@ -767,7 +767,7 @@ 
 
             --  If the subprogram body is a child unit, we must create a
             --  declaration for it, in order to properly load the parent(s).
-            --  After this, the original unit does not acts as a spec, because
+            --  After this, the original unit does not act as a spec, because
             --  there is an explicit one. If this unit appears in a context
             --  clause, then an implicit with on the parent will be added when
             --  installing the context. If this is the main unit, there is no
Index: sem_ch12.adb
===================================================================
--- sem_ch12.adb	(revision 187915)
+++ sem_ch12.adb	(working copy)
@@ -6612,7 +6612,7 @@ 
          --  If we are not instantiating, then this is where we load and
          --  analyze subunits, i.e. at the point where the stub occurs. A
          --  more permissive system might defer this analysis to the point
-         --  of instantiation, but this seems to complicated for now.
+         --  of instantiation, but this seems too complicated for now.
 
          if not Instantiating then
             declare
Index: alloc.ads
===================================================================
--- alloc.ads	(revision 187915)
+++ alloc.ads	(working copy)
@@ -30,7 +30,7 @@ 
 ------------------------------------------------------------------------------
 
 --  This package contains definitions for initial sizes and growth increments
---  for the various dynamic arrays used for principle compiler data strcutures.
+--  for the various dynamic arrays used for principal compiler data strcutures.
 --  The indicated initial size is allocated for the start of each file, and
 --  the increment factor is a percentage used to increase the table size when
 --  it needs expanding (e.g. a value of 100 = 100% increase = double)
Index: gcc-interface/misc.c
===================================================================
--- gcc-interface/misc.c	(revision 187915)
+++ gcc-interface/misc.c	(working copy)
@@ -348,7 +348,7 @@ 
 void
 gnat_init_gcc_eh (void)
 {
-  /* We shouldn't do anything if the No_Exceptions_Handler pragma is set,
+  /* We shouldn't do anything if the No_Exception_Handlers pragma is set,
      though. This could for instance lead to the emission of tables with
      references to symbols (such as the Ada eh personality routine) within
      libraries we won't link against.  */
Index: sem_res.ads
===================================================================
--- sem_res.ads	(revision 187915)
+++ sem_res.ads	(working copy)
@@ -45,7 +45,7 @@ 
    --  Since in practice a lot of semantic analysis has to be postponed until
    --  types are known (e.g. static folding, setting of suppress flags), the
    --  Resolve routines also complete the semantic analysis, and call the
-   --  expander for possibly expansion of the completely type resolved node.
+   --  expander for possibly expanding the completely type resolved node.
 
    procedure Resolve (N : Node_Id; Typ : Entity_Id);
    procedure Resolve (N : Node_Id; Typ : Entity_Id; Suppress : Check_Id);
Index: lib-xref.adb
===================================================================
--- lib-xref.adb	(revision 187915)
+++ lib-xref.adb	(working copy)
@@ -619,7 +619,7 @@ 
       --  case of 'p' since we want to include inherited primitive operations
       --  from other packages.
 
-      --  We also omit this test is this is a body reference for a subprogram
+      --  We also omit this test if this is a body reference for a subprogram
       --  instantiation. In this case the reference is to the generic body,
       --  which clearly need not be in the main unit containing the instance.
       --  For the same reason we accept an implicit reference generated for
Index: lib-xref.ads
===================================================================
--- lib-xref.ads	(revision 187915)
+++ lib-xref.ads	(working copy)
@@ -23,7 +23,7 @@ 
 --                                                                          --
 ------------------------------------------------------------------------------
 
---  This package contains for collecting and outputting cross-reference
+--  This package contains logic for collecting and outputting cross-reference
 --  information.
 
 with Einfo;    use Einfo;
Index: exp_dbug.adb
===================================================================
--- exp_dbug.adb	(revision 187915)
+++ exp_dbug.adb	(working copy)
@@ -83,7 +83,7 @@ 
    --       B : Ddd.Ttt;
    --       procedure Y is ..
 
-   --  Here B is a procedure local variable, so it does not need fully
+   --  Here B is a procedure local variable, so it does not need full
    --  qualification. The flag Has_Qualified_Name will be set on the
    --  first attempt to qualify B, to indicate that the job is done
    --  and need not be redone.