From patchwork Sat May 26 20:07:08 2012 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: "oliver.kellogg@t-online.de" X-Patchwork-Id: 161506 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Received: from sourceware.org (server1.sourceware.org [209.132.180.131]) by ozlabs.org (Postfix) with SMTP id 59C29B6FA2 for ; Sun, 27 May 2012 06:07:49 +1000 (EST) Comment: DKIM? See http://www.dkim.org DKIM-Signature: v=1; a=rsa-sha1; c=relaxed/relaxed; d=gcc.gnu.org; s=default; x=1338667670; h=Comment: DomainKey-Signature:Received:Received:Received:Received:Received: MIME-Version:Received:Date:Reply-To:To:Subject:From:Content-Type: Message-ID:Mailing-List:Precedence:List-Id:List-Unsubscribe: List-Archive:List-Post:List-Help:Sender:Delivered-To; bh=Oqfr0/v tb+KJpuXWMCv3Qb8Rbbs=; b=Ry59fjOTZsc9RGO3Kk3AUyqZq1m2HZkD06uf/VS fGYM4XduUDtDBSRhonqkH6w2gCsYsjGqCE8RL7rh+mDLbV9/Q/Em/1G05RrUWcmN XQ83w3UMs6//aMoVd5R64Rex5frYN4Yh1u74QNCSULPKbPN10YEVwr0ZhFLEP3m7 n1fs= Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=default; d=gcc.gnu.org; h=Received:Received:X-SWARE-Spam-Status:X-Spam-Check-By:Received:Received:Received:MIME-Version:Received:Date:Reply-To:To:Subject:From:Content-Type:Message-ID:Mailing-List:Precedence:List-Id:List-Unsubscribe:List-Archive:List-Post:List-Help:Sender:Delivered-To; b=g322FieIP6FJhJAgU3P2jVklidLt5t24Pk0GSre4P3fH9adXle+GjmDz1NwRmN Se7UvpFKCXCZTl8B3XQ2MQI5B2XJtfO/rY3p5DJC01+kpXQOCnbhSy0h7sV80q3G wTy+IBySP8UB2sNY/Cdpd2/0FbwZNEiNs2pfpybVNs7LY=; Received: (qmail 21163 invoked by alias); 26 May 2012 20:07:41 -0000 Received: (qmail 21151 invoked by uid 22791); 26 May 2012 20:07:37 -0000 X-SWARE-Spam-Status: No, hits=-1.2 required=5.0 tests=AWL, BAYES_00, RCVD_IN_DNSWL_NONE, RCVD_IN_HOSTKARMA_NO, SARE_SUB_ENC_UTF8, T_RP_MATCHES_RCVD, UNPARSEABLE_RELAY X-Spam-Check-By: sourceware.org Received: from mailout01.t-online.de (HELO mailout01.t-online.de) (194.25.134.80) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Sat, 26 May 2012 20:07:24 +0000 Received: from fwd11.aul.t-online.de (fwd11.aul.t-online.de ) by mailout01.t-online.de with smtp id 1SYNGk-00083G-Qq; Sat, 26 May 2012 22:07:22 +0200 Received: from localhost (XRkyygZrohLpR99WJ7GEYu-DOXDJo9t8Se4pfYEtt-WsZEdCBYZjNq8Jh58QW7JQ76@[172.20.101.250]) by fwd11.aul.t-online.de with esmtp id 1SYNGW-0yKaHo0; Sat, 26 May 2012 22:07:08 +0200 MIME-Version: 1.0 Received: from 91.33.218.209:49103 by cmpweb58.aul.t-online.de with HTTP/1.1 (NGCS V4-0-4-0 on API V3-11-7-2) Date: Sat, 26 May 2012 22:07:08 +0200 Reply-To: "oliver.kellogg@t-online.de" To: gcc-patches@gcc.gnu.org Subject: =?UTF-8?Q?=5BAda=5D?= Fix some typos in comments From: "oliver.kellogg@t-online.de" Message-ID: <1SYNGW-0yKaHo0@fwd11.aul.t-online.de> Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org Hello, I happened to notice these typos but I don't have commit rights. Thanks to whoever might pick it up. -- Oliver 2012-05-26 Oliver Kellogg * 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.