From: "Prof. Dr. Carl Weierstrass" <carl.weierstrass@googlemail.com>
Subject: Use of abstract tagged types without access types
Date: Thu, 9 Jun 2011 10:44:05 -0700 (PDT)
Date: 2011-06-09T10:44:05-07:00 [thread overview]
Message-ID: <661061d7-cc2a-45ff-b7e2-28b8f885cd02@n10g2000vby.googlegroups.com> (raw)
Hi,
I have a question to all Ada gurus:
I want to do something like:
package Test is
type Parent_Type is new Ada.Finalization.Controlled with private;
type Child_Type is abstract new Ada.Finalization.Controlled with
private;
type Child_Type_1 is new Child_Type with private;
type Child_Type_N is new Child_Type with private;
private
type Parent_Type is new Ada.Finalization.Controlled with record
Child : Child_Type'Class;
end record;
type Child_Type is abstract new Ada.Finalization.Controlled with
null record;
type Child_Type_1 is new Child_Type with null record;
type Child_Type_N is new Child_Type with null record;
end Test;
This doesn't work, because:
class-wide subtype with unknown discriminants in component declaration
Of course I could
next reply other threads:[~2011-06-09 17:44 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-06-09 17:44 Prof. Dr. Carl Weierstrass [this message]
2011-06-10 6:53 ` Use of abstract tagged types without access types AdaMagica
2011-06-10 7:17 ` Simon Wright
2011-06-10 9:42 ` AdaMagica
2011-06-12 5:51 ` Yannick Duchêne (Hibou57)
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox