Ada中“缺少私人类型的完整声明..”

Question

我在使用Ada中的包ADS文件时遇到问题。 我收到“缺少私人类型信件的完整声明”的错误。 我该如何处理？

这是我写的代码：

包LETTER_SPEC是

类型字母是私有的;

程序DATE_OF_LETTER（THE_LETTER：in out LETTER; DATE：STRING）;

程序RECIPIENT_NAME（THE_LETTER：in out LETTER; NAME：STRING）;

程序SUBJECT_LINE（THE_LETTER：in out LETTER; SUBJECT：STRING）;

procedure TEXT_OF_LETTER（THE_LETTER：in out LETTER; TEXT：STRING）;

程序SENDER_NAME（THE_LETTER：in out LETTER; NAME：STRING）;

procedure PUT_LETTER（THE_LETTER：in LETTER）;

private

type PTR_LETTER is access STRING;

类型LETTER_DATA是

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; 

端LETTER_SPEC;”

在此先感谢..

Answer 1

阿达抱怨，因为你的私处声明LETTER_DATA类型，而不是一个LETTER类型。