Ada中“缺少私人类型的完整声明..”
问题描述:
我在使用Ada中的包ADS文件时遇到问题。 我收到“缺少私人类型信件的完整声明”的错误。 我该如何处理?Ada中“缺少私人类型的完整声明..”
这是我写的代码:
包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;”
在此先感谢..
答
阿达抱怨,因为你的私处声明LETTER_DATA
类型,而不是一个LETTER
类型。