"Falta la declaración completa para el tipo privado ..." en Ada

Question

Tengo un problema al usar un paquete de archivos ADS en Ada. Recibo un error de "Falta la declaración completa para la letra privada de tipo". ¿Cómo lo trato?

este es el código que escribí:

  

paquete LETTER_SPEC es

     

type LETTER es privado;

     

procedimiento DATE_OF_LETTER (THE_LETTER: in out LETTER; DATE: STRING);

     

procedimiento RECIPIENT_NAME (THE_LETTER: in LETTER; NAME: STRING);

     

procedimiento SUBJECT_LINE (THE_LETTER: in LETTER; SUBJECT: STRING);

     

procedimiento TEXT_OF_LETTER (THE_LETTER: in out LETTER; TEXT: STRING);

     

procedimiento SENDER_NAME (THE_LETTER: dentro LETTER; NAME: STRING);

     

procedimiento PUT_LETTER (THE_LETTER: en LETTER);

     

privado

     

tipo PTR_LETTER es acceder a STRING;

     

tipo LETTER_DATA es

   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;

     

fin LETTER_SPEC; '

Gracias de antemano ..

Answer 1

Ada se queja porque declaras en la parte privada un tipo LETTER_DATA y no un tipo LETTER .