Отсутствует полное объявление для частного типа .. в Ada

У меня проблема с использованием файла ADS пакета в Ada. Я получаю сообщение об ошибке «Отсутствует полное объявление для частного типа LETTER». Как мне с этим справиться?

это код, который я написал:

пакет LETTER_SPEC - это

тип ПИСЬМО является частным;

процедура DATE_OF_LETTER (THE_LETTER: входящее ПИСЬМО; ДАТА: СТРОКА);

процедура RECIPIENT_NAME (THE_LETTER: in out LETTER; NAME: STRING);

процедура SUBJECT_LINE (THE_LETTER: на выходе LETTER; SUBJECT: STRING);

процедура TEXT_OF_LETTER (THE_LETTER: на выходе LETTER; ТЕКСТ: СТРОКА);

процедура SENDER_NAME (THE_LETTER: in out LETTER; NAME: STRING);

процедура PUT_LETTER (THE_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
person firestruq    schedule 30.11.2009    source источник


Ответы (1)


Ада жалуется, потому что вы объявляете в приватной части тип LETTER_DATA, а не тип LETTER.

person Johan Buret    schedule 30.11.2009