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=-1.9 required=5.0 tests=BAYES_00 autolearn=ham
	autolearn_force=no version=3.4.4
X-Google-Thread: 103376,a949937a76bda3b7
X-Google-NewGroupId: yes
X-Google-Attributes: gida07f3367d7,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news2.google.com!news4.google.com!feeder.news-service.com!proxad.net!feeder2-2.proxad.net!newsfeed.arcor.de!newsspool1.arcor-online.net!news.arcor.de.POSTED!not-for-mail
Date: Thu, 18 Nov 2010 23:52:42 +0100
From: Georg Bauhaus <rm-host.bauhaus@maps.futureapps.de>
User-Agent: Mozilla/5.0 (Macintosh; U; Intel Mac OS X 10.6; en-US;
 rv:1.9.2.12) Gecko/20101027 Thunderbird/3.1.6
MIME-Version: 1.0
Newsgroups: comp.lang.ada
Subject: Re: Setting up Opengl
References: 
 <1b5c6b5d-c5aa-4e59-9079-940d3f269e29@q14g2000yqe.googlegroups.com>
	<976e2a89-130e-4150-8b50-97f68b97330a@z19g2000yqb.googlegroups.com>
	<c4631d08-4bd5-4706-98a6-0a13f927153c@r14g2000yqa.googlegroups.com>
	<4ce45a30$0$7670$9b4e6d93@newsspool1.arcor-online.net>
	<7a62e247-9a36-4471-a559-4ded9810adea@v12g2000vbh.googlegroups.com>
 <m2aal676i5.fsf@pushface.org>
In-Reply-To: <m2aal676i5.fsf@pushface.org>
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Message-ID: <4ce5ae3b$0$6979$9b4e6d93@newsspool4.arcor-online.net>
Organization: Arcor
NNTP-Posting-Date: 18 Nov 2010 23:52:43 CET
NNTP-Posting-Host: 7e22ec6a.newsspool4.arcor-online.net
X-Trace: 
 DXC=gHZ<TNZc9_i[F<50eo:0kn4IUK<Cl32<a4Fo<]lROoRa8kF<OcfhCOkEWk6<UW5QXiPCY\c7>ejVhk;omGW8bZXi]?T?bbGK69m
X-Complaints-To: usenet-abuse@arcor.de
Xref: g2news2.google.com comp.lang.ada:16572
Date: 2010-11-18T23:52:43+01:00
List-Id: <comp.lang.ada>

On 11/18/10 8:53 PM, Simon Wright wrote:
> Gautier write-only<gautier_niouzes@hotmail.com>  writes:

>> http://globe3d.svn.sourceforge.net/viewvc/globe3d?revision=139&view=revision
>>
>> The distribution (from the zip file) should build "out-of-the-box" on
>> Windows, and (provided you set all source file names lower case) on
>> Linux. I test and develop it on both systems.

I'm now seeing the metal sheets (Mac, Intel, 10.6, GNAT GPL 2010).

This demo thing looks like someone's brought stuff home
from DIY store, don't they have style in space? ;-)


> The latest revision (139) built globe_3d_demo just fine, but not mini
> (because there's no file [Mm]ini.adb, I guess!)

Mini.adb has been added a few minutes ago.
The compiler wants an additional keyboard parameter
for Strike_once. Guessing, then, I have added one and
mini works, now.  Nice.

*** mini.adb	Thu Nov 18 23:42:56 2010
--- mini.orig	Thu Nov 18 23:39:48 2010
***************
*** 235,240 ****
   
!     if GLUT.Devices.Strike_once(
!         Character'Val(27),
!         GLUT.Devices.default_Keyboard'Access)
!     then
         GLUT.LeaveMainLoop;
--- 235,237 ----
   
!     if GLUT.Devices.Strike_once( Character'Val(27) ) then
         GLUT.LeaveMainLoop;