comp.lang.ada
 help / color / mirror / Atom feed
From: "Dominic D'Apice" <dapiced@sympatico.ca>
Subject: PRIVATE abstract data type in ADS
Date: Fri, 25 Oct 2002 17:52:26 -0400
Date: 2002-10-25T17:52:26-04:00	[thread overview]
Message-ID: <mailman.1035582781.21803.comp.lang.ada@ada.eu.org> (raw)


Hi, in this abstract data type in ADS (see below), do i need to put 

"type louer is access reservation" with the "IS PRIVATE" ?

If no, why i don't need to put "IS PRIVATE" after a access type when i
want to keep it PRIVATE ?


ADS
---

Package reservation   is

type auto_res IS PRIVATE	
	
type reservation IS PRIVATE;
type louer       is access reservation ;

type tete_liste_louer IS PRIVATE;
type liste_louer is access tete_liste_louer ;

...

PRIVATE

type auto_res is (econo,moyenne,grande,familliale,sport,limousine);

type reservation is record
	num       : natural := 0;

	plancher  : integer := 20;
	plafond   : integer := 20;
	classe    : auto_res := econo;
	nomclient : string(1..256);
	suivant   : louer := null;
end record;


type tete_liste_louer is record
	premier  : louer := null;
	dernier  : louer := null;
	longueur : natural    := 0;			
end record;






Thanks / merci
Dominic




             reply	other threads:[~2002-10-25 21:52 UTC|newest]

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2002-10-25 21:52 Dominic D'Apice [this message]
2002-10-26  9:11 ` PRIVATE abstract data type in ADS Pascal Obry
2002-10-30 13:24 ` John English
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox