* 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 789a17f9612b64c9818e68d81ae504f31009335d..6a32fb40ed5ad8111e533c746e05b4f0de69ac8d 100644 (file)
--- 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;