Bindings for DLL with GNAT

Bindings for DLL with GNAT

[Bernd Specht]

Hello,
 
I've some trouble with generating bindings for a dll (GNAT on Win2k).

I've written a spec containing the definitions and added:
pragma import (stdcall, XY, "XY");

Then I generated a import-library as described in gnat_ug.

When linking, the linker tells me, it miss a "XY@8". So I added the "@8" in 
the ".def"-file. Then link works, but at runtime I get a message "XY@8" not 
found in dll.

In fact, the name in the DLL is without "@8" (but the linker expects it).

Any ideas?

Regards,
Bernd

Re: Bindings for DLL with GNAT

[Szymon Guz]

Bernd Specht wrote:
> Hello,
>  
> I've some trouble with generating bindings for a dll (GNAT on Win2k).
> 
> I've written a spec containing the definitions and added:
> pragma import (stdcall, XY, "XY");
> 
> Then I generated a import-library as described in gnat_ug.
> 
> When linking, the linker tells me, it miss a "XY@8". So I added the "@8" in 
> the ".def"-file. Then link works, but at runtime I get a message "XY@8" not 
> found in dll.
> 
> In fact, the name in the DLL is without "@8" (but the linker expects it).
> 
> Any ideas?
> 
> Regards,
> Bernd

AFAIK the problem is that during compilation GNAT changes the sign '@' 
into '__0040' or sth like that. You have to change it in the file that 
you get when you compile the Ada file in which you have this pragma Import.

Szymon Guz