Re: C Interface question

[Ken Garlington <garlingtonke@lfwc.lockheed.com>]

Robert Dewar wrote:

> Dec has a pragma Import_Valued_Procedure that allows a function in the
> external world to be treated as a procedure with an initial out parameter
> that is the returned value on the Ada side. Using this pragma, we would
> have a third way of interfacing:
> 
>    procedure C_Function
>      (Return_Val : out int; Value : int; Result : in out int);
> 
>    pragma Import (C, C_Function);
>    pragma Import_Valued_Procedure
>      (Internal  => C_Function,
>       External  => "function",
>       Mechanism => (value, value, reference));
> 
> This pragma (and all other DEC Ada pragmas and attributes) will be fully
> implemented in the next version of GNAT (some of them only make sense on
> VMS, but many of them, like the above example, are generally useful).

Is there a paper available on which DEC Ada extensions will be implemented
"generally" in GNAT (beyond just the ports to DEC hardware)? There's probably
going to be quite a bit of software written with DEC Ada that will be ported
to non-DEC hardware over the next several years; if GNAT is a good way to
facilitate that migration, you might want to make that generally known...

-- 
LMTAS - "Our Brand Means Quality"