Re: How to interface in ADA with Microsoft joystick?

["Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>]

On Mon, 11 Oct 2010 13:24:33 -0700 (PDT), tolkamp wrote:

> Now the compilation of my project is error free.
> I have tried to build an executable of my project, but again an error:
> 
> gnatmake -d -PC:\\GNAT\\bin\\joystick.gpr joystick_main.adb
> gnatbind -I- -x C:\GNAT\joystick_main.ali
> gnatlink C:\GNAT\joystick_main.ali -o C:\GNAT\joystick_main.exe
> c:/gnat/2009/bin/../libexec/gcc/i686-pc-mingw32/4.3.4/ld.exe: cannot
> find -lwin32ada
> collect2: ld returned 1 exit status
> gnatlink: error when calling C:\GNAT\2009\bin\gcc.exe
> gnatmake: *** link failed.
> 
> 
> Here the contents of the project file (joystick.gpr):
> 
> project Joystick is
>    for Source_Dirs use (".", "..\2009\include\win32ada");
>    for Object_Dir use "..\";
>    for Main use ("joystick_main.adb");
>    for Library_Dir use "..\2009\lib\win32ada";
> end Joystick;

You must use 'with "win32ada.gpr";' in your project:

with "win32ada.gpr";
project Joystick is
   for Source_Dirs use (".");
   for Main use ("joystick_main.adb");
   package Linker is
      for Default_Switches ("ada") use ("-mwindows");
   end Linker;
end Joystick;

[ And you should never use absolute paths and just any paths to any
external directories. ]

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de