comp.lang.ada
 help / color / mirror / Atom feed
* object(<>)
@ 2009-04-13 16:30 convergence82
  2009-04-13 17:58 ` object(<>) anhvofrcaus
  0 siblings, 1 reply; 3+ messages in thread
From: convergence82 @ 2009-04-13 16:30 UTC (permalink / raw)


what does this mean?  Does it mean that I can call joemontana
( anytype)?

-------------------------jeffrey.ads
  type Cd is ..........
  package Convert_Cd is new joemontana(Cd);   --====> does this mean
I'm instantiating the
 
--           generic package joemontana for the type 'Cd'?

-------------------------jeffrey.adb
with_cd : System.Address
  x := Convert_Cd.To_Pointer( with_cd);

-------------------------joemontana.spc
generic
  type Object(<>) is limited private;
package joemontana is
  type Object_Pointer is access all Object;
  ...
  function To_Pointer(Value : System.Address) return Object_Pointer;
  ...
end joemontana;



^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: object(<>)
  2009-04-13 16:30 object(<>) convergence82
@ 2009-04-13 17:58 ` anhvofrcaus
  2009-04-13 18:10   ` object(<>) convergence82
  0 siblings, 1 reply; 3+ messages in thread
From: anhvofrcaus @ 2009-04-13 17:58 UTC (permalink / raw)


On Apr 13, 9:30 am, convergence82 <tiami...@gmail.com> wrote:
> what does this mean?  Does it mean that I can call joemontana
> ( anytype)?
>
> -------------------------jeffrey.ads
>   type Cd is ..........
>   package Convert_Cd is new joemontana(Cd);   --====> does this mean
> I'm instantiating the
>
> --           generic package joemontana for the type 'Cd'?
>
> -------------------------jeffrey.adb
> with_cd : System.Address
>   x := Convert_Cd.To_Pointer( with_cd);
>
> -------------------------joemontana.spc
> generic
>   type Object(<>) is limited private;
> package joemontana is
>   type Object_Pointer is access all Object;
>   ...
>   function To_Pointer(Value : System.Address) return Object_Pointer;
>   ...
> end joemontana;

Yes, it means just that. But wait, you can save time by using the
predefined one, http://adaic.org/standards/05rm/html/RM-13-7-2.html#I4643

A. Vo



^ permalink raw reply	[flat|nested] 3+ messages in thread

* Re: object(<>)
  2009-04-13 17:58 ` object(<>) anhvofrcaus
@ 2009-04-13 18:10   ` convergence82
  0 siblings, 0 replies; 3+ messages in thread
From: convergence82 @ 2009-04-13 18:10 UTC (permalink / raw)


On Apr 13, 1:58 pm, anhvofrc...@gmail.com wrote:
> On Apr 13, 9:30 am, convergence82 <tiami...@gmail.com> wrote:
>
>
>
>
>
> > what does this mean?  Does it mean that I can call joemontana
> > ( anytype)?
>
> > -------------------------jeffrey.ads
> >   type Cd is ..........
> >   package Convert_Cd is new joemontana(Cd);   --====> does this mean
> > I'm instantiating the
>
> > --           generic package joemontana for the type 'Cd'?
>
> > -------------------------jeffrey.adb
> > with_cd : System.Address
> >   x := Convert_Cd.To_Pointer( with_cd);
>
> > -------------------------joemontana.spc
> > generic
> >   type Object(<>) is limited private;
> > package joemontana is
> >   type Object_Pointer is access all Object;
> >   ...
> >   function To_Pointer(Value : System.Address) return Object_Pointer;
> >   ...
> > end joemontana;
>
> Yes, it means just that. But wait, you can save time by using the
> predefined one,http://adaic.org/standards/05rm/html/RM-13-7-2.html#I4643
>
> A. Vo- Hide quoted text -
>
> - Show quoted text -

Ah yes.  I forgot to mention that in the header of the package I'm
looking at, it references just that.  So I guess I'm looking at some
automated code generation??  Because it is awefully layered sorta
speak, at least for a newbie here.

Steph



^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2009-04-13 18:10 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2009-04-13 16:30 object(<>) convergence82
2009-04-13 17:58 ` object(<>) anhvofrcaus
2009-04-13 18:10   ` object(<>) convergence82

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