Re: Minimal pragma Export (StdCall... example?

["Frank" <franjoe@frisurf.no>]

Hi!

Some weeks ago I had difficulties with the same and managed to compile/link
when I wrote the spec according to the following pattern,
when I worked with a DLL written in Delphi Pascal :

   pragma Import (Stdcall, UpdateAll, External_Name => "UpdateAll",
Link_Name => "_UpdateAll");


Unfortunately I havent tested the resulting executable since I do not have
the necessary HW to do it, but it compiled.
You could give it a try.

Frank





"Happy Segfault" <happysegfault@yahoo.com> wrote in message
news:ed66a020.0403110531.19b21907@posting.google.com...
> Hi all,
>
> I'm trying to write a DLL using GNAT 3.15p on Windows XP.  The DLL needs
to
> export functions with the StdCall calling convention so that they can be
> called from Visual Basic.  Using samples/dll/ from the gwindows
distribution
> as a starting point, I haven't been successful in getting this to work.
>
> If I just change the occurrences of pragma Export (C... to pragma Export
> (StdCall..., the Ada test driver program call_gw_dll.adb fails to link
because
> the link library libgw_in_a_dll.a exports "_pop_a_window" only, while the
> linker wants "pop_a_window@0".  Neither of these is the "_pop_a_window@0"
I
> would have expected to see for a StdCall function.
>
> Does anybody have a minimal set of code for a DLL, test program, and
makefile
> that demonstrates building a StdCall DLL using GNAT on Windows?
>
> Best regards,
> John