This
type Event_Queue_Base (Start_Started : Boolean;
Priority : System.Priority;
Storage_Size : Positive)
is tagged private;
task type Dispatcher (The_Queue : access Event_Queue_Base'Class) is
pragma Priority (The_Queue.Priority);
pragma Storage_Size (The_Queue.Storage_Size);
results in
constrained_task.ads:12:24: premature usage of incomplete type
"Event_Queue_Base'Class" defined at
line 5
Reproducer to follow.
--
Summary: Unable to access components of task access constraint
Product: gcc
Version: 4.0.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: ada
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: simon at pushface dot org
CC: gcc-bugs at gcc dot gnu dot org
GCC build triplet: powerpc-apple-darwin7.8.0
GCC host triplet: powerpc-apple-darwin7.8.0
GCC target triplet: powerpc-apple-darwin7.8.0
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=20921
