Re: Interfaces.C questions

[Simon Wright <simon@pushface.org>]

hreba <f_hreba@yahoo.com.br> writes:

>    function func (x: C.double; params: Void_Ptr) return C.double is
>    begin
>       return C.double (real_func (Real(x)));
>    end func;
>    pragma Convention (C, func);		-- this is line 37

Try

   function func (x: C.double; params: Void_Ptr) return C.double;
   pragma Convention (C, func);
   function func (x: C.double; params: Void_Ptr) return C.double is
   begin
      return C.double (real_func (Real(x)));
   end func;

You have to have a spec, but there's nothing stopping it being declared
right before the body.

Of course, in most cases you'd prefer to do that earlier.