Re: Subprogram Pointer in a Generic

["James S. Rogers" <jimmaureenrogers@worldnet.att.net>]

"Charles H. Sampson" <claveman@grzorgenplatz.net> wrote in message
news:1ftiuys.1twhum2q9qa00N%claveman@grzorgenplatz.net...
>      I'm using a procedure that takes a procedure pointer as an
> argument.  It's pretty standard stuff:
>
>           type Parameterless_Proc_Ptr is access procedure;
>           procedure Register (The_Proc : in Parameterless_Proc_Ptr);
>
>      My problem occurs when I want to call this procedure from within a
> generic package.  I can't, because 3.10.2(32) says "If the subprogram
> denoted by P [the prefix of 'Access] is declared within a generic body,
> S [the access-to-subprogram type of the formal parameter] shall be
> declared within the generic body."

Why are you passing a procedure access to a generic?

Why not simply pass the procedure as a simple generic parameter:

generic
   with procedure Parameterless_Proc;

This will allow you to call the actual procedure without any of the
issues you describe.

Jim Rogers