Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[reinkor]

Could anybody give a hint on how to use OpenGL (Mesa)
from Ada (GNAT) under linux (for example openSUSE 12.2) ?

reinert

Re: Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[John B. Matthews]

In article <5f621dd4-c254-4ab4-9d41-7752a5cfc565@googlegroups.com>,
 reinkor <reinkor@gmail.com> wrote:

> Could anybody give a hint on how to use OpenGL (Mesa)
> from Ada (GNAT) under linux (for example openSUSE 12.2) ?

There are some examples in the GtkAda/testgtk/opengl, shown in the 
testgtk application.

-- 
John B. Matthews
trashgod at gmail dot com
<http://sites.google.com/site/drjohnbmatthews>

Re: Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[Shark8]

On Wednesday, February 13, 2013 4:50:00 AM UTC-6, reinkor wrote:
> Could anybody give a hint on how to use OpenGL (Mesa)
> from Ada (GNAT) under linux (for example openSUSE 12.2) 
> reinert

I have a working-but-partial OpenGL binding over here: https://github.com/OneWingedShark/TAO-GL

It has at least all the functions included through OpenGL 1.1, though all of them updated for the enumerations of the 4.3 version. (I haven't gotten around to the additional [1.2+] functions yet; also it needs a bit of a rework to be able to [automatically] take advantage of the dynamic enumerations instead of only going with the bare-minimums.)

Re: Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[reinkor]

Made an attempt:

gnatmake -gnat2012 Test.adb

Got:

tao_gl-functions.adb:18:69: missing ";"
tao_gl-functions.adb:19:09: "With" can only appear in context clause
tao_gl-functions.adb:20:40: missing ";"
tao_gl-functions.adb:21:09: "With" can only appear in context clause
tao_gl-functions.adb:22:36: missing ";"
tao_gl-functions.adb:23:09: "With" can only appear in context clause
tao_gl-functions.adb:24:20: missing ";"


...etc...

I had to rename for example tao_gl.functions.adb to tao_gl-functions.adb

You use linux?  (I used here linux/openSUSE 12.2).

reinert




On Wednesday, February 13, 2013 7:10:12 PM UTC+1, Shark8 wrote:
> On Wednesday, February 13, 2013 4:50:00 AM UTC-6, reinkor wrote:
> 
> > Could anybody give a hint on how to use OpenGL (Mesa)
> 
> > from Ada (GNAT) under linux (for example openSUSE 12.2) 
> 
> > reinert
> 
> 
> 
> I have a working-but-partial OpenGL binding over here: https://github.com/OneWingedShark/TAO-GL
> 
> 
> 
> It has at least all the functions included through OpenGL 1.1, though all of them updated for the enumerations of the 4.3 version. (I haven't gotten around to the additional [1.2+] functions yet; also it needs a bit of a rework to be able to [automatically] take advantage of the dynamic enumerations instead of only going with the bare-minimums.)

Re: Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[reinkor]

Sorry, I should use "gnatmake -Ptao_gl.gpr ..." ?

Need to get things via teaspoon :-)

reinert


On Thursday, February 14, 2013 9:30:45 AM UTC+1, reinkor wrote:
> Made an attempt:
> 
> 
> 
> gnatmake -gnat2012 Test.adb
> 
> 
> 
> Got:
> 
> 
> 
> tao_gl-functions.adb:18:69: missing ";"
> 
> tao_gl-functions.adb:19:09: "With" can only appear in context clause
> 
> tao_gl-functions.adb:20:40: missing ";"
> 
> tao_gl-functions.adb:21:09: "With" can only appear in context clause
> 
> tao_gl-functions.adb:22:36: missing ";"
> 
> tao_gl-functions.adb:23:09: "With" can only appear in context clause
> 
> tao_gl-functions.adb:24:20: missing ";"
> 
> 
> 
> 
> 
> ...etc...
> 
> 
> 
> I had to rename for example tao_gl.functions.adb to tao_gl-functions.adb
> 
> 
> 
> You use linux?  (I used here linux/openSUSE 12.2).
> 
> 
> 
> reinert
> 
> 
> 
> 
> 
> 
> 
> 
> 
> On Wednesday, February 13, 2013 7:10:12 PM UTC+1, Shark8 wrote:
> 
> > On Wednesday, February 13, 2013 4:50:00 AM UTC-6, reinkor wrote:
> 
> > 
> 
> > > Could anybody give a hint on how to use OpenGL (Mesa)
> 
> > 
> 
> > > from Ada (GNAT) under linux (for example openSUSE 12.2) 
> 
> > 
> 
> > > reinert
> 
> > 
> 
> > 
> 
> > 
> 
> > I have a working-but-partial OpenGL binding over here: https://github.com/OneWingedShark/TAO-GL
> 
> > 
> 
> > 
> 
> > 
> 
> > It has at least all the functions included through OpenGL 1.1, though all of them updated for the enumerations of the 4.3 version. (I haven't gotten around to the additional [1.2+] functions yet; also it needs a bit of a rework to be able to [automatically] take advantage of the dynamic enumerations instead of only going with the bare-minimums.)

Re: Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[Shark8]

On Thursday, February 14, 2013 2:30:45 AM UTC-6, reinkor wrote:
> Made an attempt:
> 
> gnatmake -gnat2012 Test.adb
> 
> 
> Got:
> 
> tao_gl-functions.adb:18:69: missing ";"
> tao_gl-functions.adb:19:09: "With" can only appear in context clause
> tao_gl-functions.adb:20:40: missing ";"
> tao_gl-functions.adb:21:09: "With" can only appear in context clause
> tao_gl-functions.adb:22:36: missing ";"
> tao_gl-functions.adb:23:09: "With" can only appear in context clause
> tao_gl-functions.adb:24:20: missing ";"
> 
> ...etc...

Those sound like errors caused by the compiler not recognizing aspects, which were introduced w/ Ada 2012, so won't compile if you're using an 83/95/2005 compiler.

> 
> I had to rename for example tao_gl.functions.adb to tao_gl-functions.adb
> 
> You use linux?  (I used here linux/openSUSE 12.2).

Nope, windows.
Should still work, I don't think I've done anything platform-specific.
(The multiple-dot filenames shouldn't be a problem, but Linux is... funny about filenames.)

Re: Linux (openSUSE), Ada (GNAT) + OpenGL (MESA) = possible?

[Shark8]

On Thursday, February 14, 2013 4:29:37 AM UTC-6, reinkor wrote:
> Sorry, I should use "gnatmake -Ptao_gl.gpr ..." ?

That'd probably work better -- it sets up the things like dot-replacement (off in that project's case) and such.