From: charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Fri, 24 Apr 2009 10:05:56 +0000 (+0000)
Subject:         * prj.ads (Language_Ptr): Make a general access type.
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=f735bc292a9498bec805e0c21477fa1b14f9bd20;p=thirdparty%2Fgcc.git

    * prj.ads (Language_Ptr): Make a general access type.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146686 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/ada/prj.ads b/gcc/ada/prj.ads
index 789a17f9612b..6a32fb40ed5a 100644
--- a/gcc/ada/prj.ads
+++ b/gcc/ada/prj.ads
@@ -308,7 +308,7 @@ package Prj is
    --  The table that contains all packages
 
    type Language_Data;
-   type Language_Ptr is access Language_Data;
+   type Language_Ptr is access all Language_Data;
    --  Index of language data
 
    No_Language_Index : constant Language_Ptr := null;