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

From-SVN: r146686

* prj.ads (Language_Ptr): Make a general access type.
From-SVN: r146686
fb891c87 · Arnaud Charlet · 144c034d · fb891c87
Commit fb891c87 authored Apr 24, 2009 by Arnaud Charlet
Hide whitespace changes
Inline Side-by-side

Showing with 1 additions and 1 deletions

gcc/ada/prj.ads
+1 -1

No files found.
--- 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;