On 05/25/2017 11:51 PM, Jeremiah Breeden wrote:
> type Dialog_Type is new Gnoga.Gui.View.View_Base_Type with private;
>
> private
>
> type Dialog_Type is new Gnoga.Gui.View.View_Type with record
> Main_View : Gnoga.Gui.View.View_Access := null;
> end record;
Your derivation is public. What fields you added is private. You probably want
type Dialog_Type is tagged private;
private
type Dialog_Type is new Gnoga.Gui.View.View_Type with record Main_View
: Gnoga.Gui.View.View_Access := null; end record;
--
Jeff Carter
"Nobody expects the Spanish Inquisition!"
Monty Python's Flying Circus
22
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Gnoga-list mailing list
Gnoga-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gnoga-list
