Re: OO Preprocessor for Ada

[cis.ohio-state.edu!math.ohio-state.edu!howland.reston.ans.net!vixen.cso.u iuc.edu!cs.uiuc.edu!cs.uiuc.edu!rowe@ucbvax.Berkeley.EDU (Kenneth E. Rowe)]

...stuff deleted
>
>   with X, Text_IO;
>   procedure Some_Client is
>      An_Object : X.Object;
>      P : Integer;
>   begin
>      X.Create (Instance => An_Object, P1 => 7);
>      X.Modify (An_Object, P1 => 3);
>      P := X.P1 (An_Object);
>      Text_IO.Put ("The value of P1 is: ");
>      Text_IO.Put ( Integer'IMAGE(P) );
                     ^^^^^^^^^^^^^^^^
Since X.Object is a tagged limited private type, can you 
actually do an Integer'IMAGE on P?

{I liked your post, but I'm just trying to make sure I understand
the example}

>   end Some_Client;
>   

Ken.