summaryrefslogtreecommitdiff
path: root/gcc/ada/a-tiinio.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/a-tiinio.ads')
-rw-r--r--gcc/ada/a-tiinio.ads9
1 files changed, 5 insertions, 4 deletions
diff --git a/gcc/ada/a-tiinio.ads b/gcc/ada/a-tiinio.ads
index 9d659f33e09..459d6fe5a6e 100644
--- a/gcc/ada/a-tiinio.ads
+++ b/gcc/ada/a-tiinio.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2009, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2014, 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 --
@@ -35,9 +35,10 @@
-- In Ada 95, the package Ada.Text_IO.Integer_IO is a subpackage of Text_IO.
-- This is for compatibility with Ada 83. In GNAT we make it a child package
--- to avoid loading the necessary code if Integer_IO is not instantiated. See
--- routine Rtsfind.Text_IO_Kludge for a description of how we patch up the
--- difference in semantics so that it is invisible to the Ada programmer.
+-- to avoid loading the necessary code if Integer_IO is not instantiated.
+-- See routine Rtsfind.Check_Text_IO_Special_Unit for a description of how
+-- we patch up the difference in semantics so that it is invisible to the
+-- Ada programmer.
private generic
type Num is range <>;