Ada &引用;缺少私有类型的完整声明……”;在阿达

Ada &引用;缺少私有类型的完整声明……”;在阿达,ada,Ada,我在Ada中使用包广告文件时遇到问题。 我得到了一个错误“丢失私人信件的完整声明”。 我该怎么处理呢 这是我写的代码: 包装信规格为 打字信是私人的 字母的程序日期(字母:输入输出字母;日期:字符串) 过程收件人名称(字母:输入输出字母;名称:字符串) 过程主题行(字母:输入输出字母;主题:字符串) _字母的过程文本_(_字母:输入输出字母;文本:字符串) 过程发送者名称(字母:输入输出字母;名称:字符串) 程序放置字母(字母:in-LETTER) 私人的 类型PTR_字母为访问字符串 输入字母

我在Ada中使用包广告文件时遇到问题。 我得到了一个错误“丢失私人信件的完整声明”。 我该怎么处理呢

这是我写的代码:

包装信规格为

打字信是私人的

字母的程序日期(字母:输入输出字母;日期:字符串)

过程收件人名称(字母:输入输出字母;名称:字符串)

过程主题行(字母:输入输出字母;主题:字符串)

_字母的过程文本_(_字母:输入输出字母;文本:字符串)

过程发送者名称(字母:输入输出字母;名称:字符串)

程序放置字母(字母:in-LETTER)

私人的

类型PTR_字母为访问字符串

输入字母_数据为

   record

      DATE_OF_LETTER: PTR_LETTER;

       RECIPIENT_NAME: PTR_LETTER;

      SUBJECT_LINE: PTR_LETTER;

       TEXT_OF_LETTER: PTR_LETTER;

       SENDER_NAME: PTR_LETTER;

   end record;
结束字母_SPEC;'


提前感谢。

Ada投诉,因为您在私人部分声明了一种
字母_数据
类型,而不是
字母
类型