X-Git-Url: http://git.sourceforge.jp/view?a=blobdiff_plain;f=gcc%2Fada%2Fa-cihase.ads;h=52d0441ec2a5f96602aa199b4365363e7472ac4f;hb=068f40295c3c2ba63eb76bb3e589978da09d8842;hp=6dab3bfdcdbec230637ea6c20c5b0bd9c8e4ecf2;hpb=99037453d9a50d75d88cbe7c9e81f8a3d0e4e357;p=pf3gnuchains%2Fgcc-fork.git

diff --git a/gcc/ada/a-cihase.ads b/gcc/ada/a-cihase.ads
index 6dab3bfdcdb..52d0441ec2a 100644
--- a/gcc/ada/a-cihase.ads
+++ b/gcc/ada/a-cihase.ads
@@ -7,7 +7,7 @@
 --                                                                          --
 --                                 S p e c                                  --
 --                                                                          --
---          Copyright (C) 2004-2006, Free Software Foundation, Inc.         --
+--          Copyright (C) 2004-2007, 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 --
@@ -50,6 +50,7 @@ generic
 
 package Ada.Containers.Indefinite_Hashed_Sets is
    pragma Preelaborate;
+   pragma Remote_Types;
 
    type Set is tagged private;
    pragma Preelaborable_Initialization (Set);
@@ -204,6 +205,9 @@ package Ada.Containers.Indefinite_Hashed_Sets is
    end Generic_Keys;
 
 private
+
+   pragma Inline (Next);
+
    type Node_Type;
    type Node_Access is access Node_Type;