“プライベートタイプの完全な宣言がありません。”エイダで

StackOverflow https://stackoverflow.com/questions/1820054

  •  10-07-2019
  •  | 
  •  

質問

AdaのパッケージADSファイルの使用に問題があります。 「プライベート型LETTERの完全な宣言がありません」というエラーが表示されます。 どのように対処しますか?

これは私が書いたコードです:

  

パッケージLETTER_SPECは

     

タイプLETTERはプライベートです;

     

プロシージャ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);

     

手順TEXT_OF_LETTER(THE_LETTER:in out LETTER; TEXT:STRING);

     

手順SENDER_NAME(THE_LETTER:in out LETTER; NAME:STRING);

     

プロシージャPUT_LETTER(THE_LETTER:in LETTER);

     

プライベート

     

タイプPTR_LETTERはアクセス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の終了; '

事前に感謝します。

役に立ちましたか?

解決

Adaは、プライベート部分で LETTER 型ではなく LETTER_DATA 型を宣言しているため、文句を言います。

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top