From: John English <je@bton.ac.uk>
Subject: Re: First attribute on Enumerated types
Date: 1999/02/24
Date: 1999-02-24T00:00:00+00:00 [thread overview]
Message-ID: <36D3D833.75392AE9@bton.ac.uk> (raw)
In-Reply-To: 36D3678F.6C3CB1F6@aasaa.ofe.org
David Starner wrote:
> type Color is private;
... but not necessarily an enumeration; it might be a record type, or a Float...
> procedure SetRoot(BaseTree: in out Tree; Item: in Node_Pointer;
> NewColor: in Color := Color'First);
... but private types (or the record types that might be used in an instantiation)
don't have a 'First attribute...
Try this:
type Color is (<>);
or this:
type Color is private;
Color_First : Color; -- supply your desired "first" value here and use
-- Color_First instead of Color'First
> The irony is, there ARE drugs that ENHANCE it. This says something
> profound about either science or medicine or people or muppets or all
> four. - S. John Ross
Enhance what??? (just curious...;-)
-----------------------------------------------------------------
John English | mailto:je@brighton.ac.uk
Senior Lecturer | http://www.it.bton.ac.uk/staff/je
Dept. of Computing | ** NON-PROFIT CD FOR CS STUDENTS **
University of Brighton | -- see http://burks.bton.ac.uk
-----------------------------------------------------------------
next prev parent reply other threads:[~1999-02-24 0:00 UTC|newest]
Thread overview: 5+ messages / expand[flat|nested] mbox.gz Atom feed top
[not found] <001e01be5f9d$ebe4d7e0$5b824a0c@rogers>
1999-02-23 0:00 ` First attribute on Enumerated types David Starner
1999-02-24 0:00 ` John English [this message]
1999-02-24 0:00 ` Matthew Heaney
1999-02-24 0:00 ` Mark A Biggar
1999-02-23 0:00 David Starner
replies disabled
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox