Re: How to interface in ADA with Microsoft joystick?

[tolkamp <f.tolkamp@gmail.com>]

On 5 okt, 09:30, "Dmitry A. Kazakov" <mail...@dmitry-kazakov.de>
wrote:
> On Mon, 4 Oct 2010 12:46:12 -0700 (PDT), tolkamp wrote:
> > On 4 okt, 21:30, tolkamp <f.tolk...@gmail.com> wrote:
> >> From the sidehttp://libre.adacore.com/libre/download2Ihave
> >> downloaded the file win32ada-gpl-2010.exe.
> >> Is this the correct file?
>
> I guess so, provided, you are using GNAT GPL 2010.
>
> > In addition: the win32 spec and body file is also found in
> > GNAT/bin/source/src/gnat.
>
> Should be .../include/win32ada/
>
> But that depends on the win32ada.gpr file. If you want to know for sure
> where are the specifications, you look into this file. The file must be
> located under .../lib/gnat, because that is the default directory where
> GNAT searches for gpr-files (others are form the ADA_PROJECT_PATH
> environment variable). Now in that file you will see the path to sources,
> e.g.
>
> project Win32Ada is
>    for Languages use ("ada");
>    for Source_Dirs use ("../../include/win32ada");
>    for Library_Dir use "../../lib/win32ada";
>    for Library_Name use "win32ada";
>    for Externally_Built use "true";
> end Win32Ada;
>
> So the source directory is
>
> .../lib/gnat/../../include/win32ada = ../include/win32ada
>
> --
> Regards,
> Dmitry A. Kazakovhttp://www.dmitry-kazakov.de


Finally I had success to include the package Win32 in my project.
Compilation of the project gives the following error message for
package win32-winnt.ads:
“representation item appears too late”

pragma Convention(C, anonymous1_t);        -- winnt.h:186
pragma Convention(C, LUID_AND_ATTRIBUTES); -- winnt.h:2000
pragma Convention(C, SID_IDENTIFIER_AUTHORITY);

By the way, I use GNAT GPL 2009 (version 4.3.1).