Ada嵌套通用包

时间:2013-11-03 05:17:10

标签: generics ada

我试着搜索我认为是嵌套通用包的内容,我不知道如何在Ada中实现。我在网上找不到任何有用的参考资料或资料来源,所以请告诉我是否有可能或其他方法来完成它。

package AdjList is new List(Integer);
package Graph is new List(AdjList);

我收到有关我传递给List通用包的类型的这两行的编译错误。

我正在尝试使用2个嵌套列表来形成一种图形,我不得不使用这种实现方法。任何想法/想法?

2 个答案:

答案 0 :(得分:6)

错误来自于您传递AdjList这个参数的包。您需要传递一个类型,该类型是该包的主要数据。

package AdjList is new List(Integer);
package Graph is new List(AdjList.Data);   

答案 1 :(得分:0)

根据编译器/如何设置开发环境,您可能需要确保每个包实例都在单独的文件中(如果您使用Gnat,则为.ads文件)。