diff options
Diffstat (limited to 'gcc/ada/a-witeio.ads')
| -rw-r--r-- | gcc/ada/a-witeio.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/a-witeio.ads b/gcc/ada/a-witeio.ads index b7d06ea8732..0ea32ce2b0c 100644 --- a/gcc/ada/a-witeio.ads +++ b/gcc/ada/a-witeio.ads @@ -138,7 +138,7 @@ package Ada.Wide_Text_IO is -- Buffer control -- -------------------- - -- Note: The paramter file is in out in the RM, but as pointed out + -- Note: The parameter file is in out in the RM, but as pointed out -- in <<95-5166.a Tucker Taft 95-6-23>> this is clearly an oversight. procedure Flush (File : File_Type); @@ -319,7 +319,7 @@ private -- omitted on output unless an explicit New_Page call is made before -- closing the file. No page mark is added when a file is appended to, -- so, in accordance with the permission in (RM A.10.2(4)), there may - -- or may not be a page mark separating preexising text in the file + -- or may not be a page mark separating preexisting text in the file -- from the new text to be written. -- A file mark is marked by the physical end of file. In DOS translation @@ -352,12 +352,12 @@ private Self : aliased File_Type; -- Set to point to the containing Text_AFCB block. This is used to - -- implement the Current_{Error,Input,Ouput} functions which return + -- implement the Current_{Error,Input,Output} functions which return -- a File_Access, the file access value returned is a pointer to -- the Self field of the corresponding file. Before_LM : Boolean := False; - -- This flag is used to deal with the anomolies introduced by the + -- This flag is used to deal with the anomalies introduced by the -- peculiar definition of End_Of_File and End_Of_Page in Ada. These -- functions require looking ahead more than one character. Since -- there is no convenient way of backing up more than one character, |