Re: Least Dangerous Way to Do This ?

[Simon Wright <simon@pushface.org>]

patrick@spellingbeewinnars.org writes:

> I need to interface with automatically generated C. function pointers
> are represented as a pointer to a pointer to a char. This is weird but
> done for pointer arithmetic purposes.

But it's not really a char**, is it!

   procedure Pointers is
      type Procedure_P is access procedure with Convention => C;
      type Procedure_P_P is access Procedure_P;
      P : Procedure_P_P;
      procedure Proc is null with Convention => C;
   begin
      P.all := Proc'Access;
   end Pointers;

You could try something involving Proc'Address, though it's not obvious
that that's mandated to be the address of something that you could
call. Maybe convention C does that.