Commit fb891c87 by Arnaud Charlet

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

From-SVN: r146686
parent 144c034d
...@@ -308,7 +308,7 @@ package Prj is ...@@ -308,7 +308,7 @@ package Prj is
-- The table that contains all packages -- The table that contains all packages
type Language_Data; type Language_Data;
type Language_Ptr is access Language_Data; type Language_Ptr is access all Language_Data;
-- Index of language data -- Index of language data
No_Language_Index : constant Language_Ptr := null; No_Language_Index : constant Language_Ptr := null;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment