diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-01 10:13:07 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-01 10:13:07 +0000 |
| commit | 0f81054e198f9cb86265199bc9333c69e2d05bd2 (patch) | |
| tree | 80b2891d2bd962b1ad2899ce9772f36e8f54b80a /gcc/ada/a-textio.ads | |
| parent | 0b424e9be6f961c9be3446505fe32d62edcc22a8 (diff) | |
| download | gcc-0f81054e198f9cb86265199bc9333c69e2d05bd2.tar.gz | |
2011-08-01 Robert Dewar <dewar@adacore.com>
* a-ztexio.ads, a-textio.ads, a-witeio.ads: Fix comment.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177006 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-textio.ads')
| -rw-r--r-- | gcc/ada/a-textio.ads | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/gcc/ada/a-textio.ads b/gcc/ada/a-textio.ads index d22b2f9c635..1999b7cc1ab 100644 --- a/gcc/ada/a-textio.ads +++ b/gcc/ada/a-textio.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2009, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2010, Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -62,9 +62,8 @@ package Ada.Text_IO is Append_File => 3); -- System.File_IO.File_Mode'Pos (Append_File) type Count is range 0 .. Natural'Last; - -- The value of Count'Last must be large enough so that the assumption - -- enough so that the assumption that the Line, Column and Page - -- counts can never exceed this value is a valid assumption. + -- The value of Count'Last must be large enough so that the assumption that + -- the Line, Column and Page counts can never exceed this value is valid. subtype Positive_Count is Count range 1 .. Count'Last; |