From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-0.9 required=5.0 tests=BAYES_00,FORGED_GMAIL_RCVD,
	FREEMAIL_FROM autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,4d1b41004c1d217c
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!postnews.google.com!d17g2000yqm.googlegroups.com!not-for-mail
From: tolkamp <f.tolkamp@gmail.com>
Newsgroups: comp.lang.ada
Subject: Re: How to interface in ADA with Microsoft joystick?
Date: Tue, 12 Oct 2010 10:41:17 -0700 (PDT)
Organization: http://groups.google.com
Message-ID: 
 <9fff073e-2a2e-469e-8d0d-57da9cb00423@d17g2000yqm.googlegroups.com>
References: 
 <2edbcdab-8ff5-40e6-9ac0-44be6cb93621@m15g2000yqm.googlegroups.com>
 <3a82f59a-129f-46b1-bd0c-eae124136590@26g2000yqv.googlegroups.com>
 <zxdah2dl84in$.1f64fdn0htb1m$.dlg@40tude.net>
 <f5f1d30a-a7d5-4acb-8c3c-1a26d8e2a0bb@28g2000yqm.googlegroups.com>
 <h1a3x95l249h.15l5y1aqekwdt.dlg@40tude.net>
 <0402e3f7-151c-4a51-bd61-44f4fc32a9d1@l20g2000yqm.googlegroups.com>
 <1thnsl7r3l217.1g1mvpwzjokvr.dlg@40tude.net>
 <bd8d62ef-2403-4eee-937f-2b1cd1bd435a@g8g2000yqa.googlegroups.com>
 <tu0299qu7wzb.kwz3ru9weav$.dlg@40tude.net>
 <f8b20345-151a-4970-acc9-053606a41bfb@x23g2000vba.googlegroups.com>
 <1ntdrf2b9blvx.1qzgqdxqb9jvn$.dlg@40tude.net>
 <c23c5b8e-ef0f-47e4-a3b2-465afff6ac50@30g2000yqm.googlegroups.com>
 <1lj7ed5rhng0p.5cwwj78z71lz.dlg@40tude.net>
 <e92745e5-277a-4331-b239-ea7d00fd44cc@30g2000yqm.googlegroups.com>
 <1whjqkty3xbqg$.c1wt6f7w4l2r$.dlg@40tude.net>
NNTP-Posting-Host: 62.163.210.190
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
X-Trace: posting.google.com 1286905278 3243 127.0.0.1 (12 Oct 2010 17:41:18
 GMT)
X-Complaints-To: groups-abuse@google.com
NNTP-Posting-Date: Tue, 12 Oct 2010 17:41:18 +0000 (UTC)
Complaints-To: groups-abuse@google.com
Injection-Info: d17g2000yqm.googlegroups.com; posting-host=62.163.210.190;
 posting-account=nZAcngoAAACcfYM9wDw3w9Z1XR3bObfs
User-Agent: G2/1.0
X-HTTP-UserAgent: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64;
 Trident/4.0; GTB6.5; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR
 3.0.30729; Media Center PC 6.0; InfoPath.1; .NET4.0C),gzip(gfe)
Xref: g2news1.google.com comp.lang.ada:14493
Date: 2010-10-12T10:41:17-07:00
List-Id: <comp.lang.ada>

On 12 okt, 14:07, "Dmitry A. Kazakov" <mail...@dmitry-kazakov.de>
wrote:
> On Tue, 12 Oct 2010 02:52:07 -0700 (PDT), tolkamp wrote:
> > gnatmake -d -PC:\\GNAT\\bin\\joystick.gpr joystick_main.adb
> > gnatbind -I- -x C:\GNAT\bin\joystick_main.ali
> > error: "win32-mmsystem.adb" must be recompiled ("win32-mmsystem.ads"
> > has been modified)
> > gnatmake: *** bind failed.
>
> That should never happen because it is compiled upon installation. You
> probably have broken the installation of win32ada.
>
> 1. Remove GNAT GPL 2009.
>
> 2. Download and install GNAT GPL 2010 and Win32Ada from the official site.
>
> --
> Regards,
> Dmitry A. Kazakovhttp://www.dmitry-kazakov.de

Now I have installed GNAT GPL 2010 and win32ada 2010 on my PC from
site
http://libre.adacore.com/libre/download2.

After adding the joystick package spec from site
http://www.adapower.com/index.php?Command=Class&ClassID=Bindings&CID=388
into
package win32.mmsystem.asp the compilation of the project joystick is
error free.

Building of project gives the result:

gnatmake -d -PC:\GNAT\2010\bin\joystick.gpr -XLIBRARY_TYPE=static
joystick_main.adb
gnatbind -I- -x C:\GNAT\2010\bin\joystick_main.ali
error: "win32-mmsystem.adb" must be recompiled ("win32-mmsystem.ads"
has been modified)
gnatmake: *** bind failed.