Re: Some questions

["David C. Hoos" <david.c.hoos.sr@ada95.com>]

----- Original Message ----- 
From: "Sim Con" <sicon@hotmail.com>
Newsgroups: comp.lang.ada
To: <comp.lang.ada@ada.eu.org>
Sent: Thursday, October 10, 2002 8:34 AM
Subject: Re: Some questions


> Thanxs for the answer ^_^ but i have another question: 
> my print procedure needs a stack type for work and use some 
> private variable of the generic class so if i define a specific print 
> in other parts (main procedures or in other packages) i receive an
> error, any help? thanx again!! ^_^
Your _specific_ print procedure should only print an _item_ (e.g.,
a float).  Then inside your generic body you have the procedure
that uses the private variables of the generic class, calling your
specific via the formal generic parameter.

Alternatively, and probably better, instead of specifying a
specific _print_ procedure, you could specify an _image_ function
for each item.  That image function would return a string however
you want the item to appear when printed.  Then your generic
print procedure calls that _image_ function when it wants to show
an item.