ANN: QtAda preview available

ANN: QtAda preview available

[vgodunko]

Hello,

QtAda is an Ada2005 language bindings to Qt 4.2. Its allow easly
create powerfull graphical user interface on Ada. QtAda use native
thread safe signal/slot mechanism, provide access to more than 70 Qt
classes, provide Ada-aware meta object compiler, support development
of custom widgets and Qt Designer's custom widget plugins, support
loading at runtime of GUI forms from Qt Designer's UI files and so on.

Current snapshort available at

http://sourceforge.net/projects/qtada/

Re: ANN: QtAda preview available

[Martin Krischik]

vgodunko@rostel.ru schrieb:

> QtAda is an Ada2005 language bindings to Qt 4.2. 

Qt 4.2 - is that the one for the upcomming KDE4?

Martin

Re: ANN: QtAda preview available

[vgodunko]

On Apr 12, 5:45 pm, Martin Krischik <krisc...@users.sourceforge.net>
wrote:
> vgodu...@rostel.ru schrieb:
>
> > QtAda is an Ada2005 language bindings to Qt 4.2.
>
> Qt 4.2 - is that the one for the upcomming KDE4?
>
Yes, you are right.

Re: ANN: QtAda preview available

[Dirk Heinrichs]

vgodunko@rostel.ru wrote:

> QtAda is an Ada2005 language bindings to Qt 4.2.
> Current snapshort available at

It doesn't compile (Gentoo Linux, gnat-gcc 4.1.2):

make[3]: Entering directory
`/home/heini/tmp/qtada-0.1.0-20070412-6841/source/core'
/bin/sh ../../libtool --tag=CC --mode=compile ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyaAbcdefhikmoprstux -gnatwae -I. -I.
qt4-child_events-constructors.adb
 ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyaAbcdefhikmoprstux -gnatwae -I. -I.
qt4-child_events-constructors.adb  -fPIC -DPIC -o .libs/qt4-child_events-constructors.o
gnat1: invalid switch: y
make[3]: *** [qt4-child_events-constructors.lo] Fehler 1
make[3]: Leaving directory
`/home/heini/tmp/qtada-0.1.0-20070412-6841/source/core'


Bye...

        Dirk

Re: ANN: QtAda preview available

[Ludovic Brenta]

Dirk Heinrichs writes:
> vgodunko@rostel.ru wrote:
>
>> QtAda is an Ada2005 language bindings to Qt 4.2.
>> Current snapshort available at
>
> It doesn't compile (Gentoo Linux, gnat-gcc 4.1.2):
>
> make[3]: Entering directory
> `/home/heini/tmp/qtada-0.1.0-20070412-6841/source/core'
> /bin/sh ../../libtool --tag=CC --mode=compile ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyaAbcdefhikmoprstux -gnatwae -I. -I.
> qt4-child_events-constructors.adb
>  ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyaAbcdefhikmoprstux -gnatwae -I. -I.
> qt4-child_events-constructors.adb  -fPIC -DPIC -o .libs/qt4-child_events-constructors.o
> gnat1: invalid switch: y
                         ^ The compiler is complaining about the
-gnaty switch.  Please check that all the sub-switches after -gnaty
are supported by this version of gnat.  It is possible that Vadim used
switches that are only available in GNAT GPL or GNAT Pro.

You may want to just remove -gnaty.... , as this switch is only useful
for the author of the software.

-- 
Ludovic Brenta.

Re: ANN: QtAda preview available

[Simon Wright]

Ludovic Brenta <ludovic@ludovic-brenta.org> writes:

> Dirk Heinrichs writes:

>>  ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyaAbcdefhikmoprstux -gnatwae -I. -I.
>> qt4-child_events-constructors.adb  -fPIC -DPIC -o .libs/qt4-child_events-constructors.o
>> gnat1: invalid switch: y
>                          ^ The compiler is complaining about the
> -gnaty switch.  Please check that all the sub-switches after -gnaty
> are supported by this version of gnat.  It is possible that Vadim used
> switches that are only available in GNAT GPL or GNAT Pro.

With gnat-gpl-2006 on Mac OS X I get eg

   $ gnatmake -g -gnat05 dbprog -f -gnatyXgcc -c -g -gnat05 -gnatyX dbprog.adb
   gnat1: bad -gnaty switch (invalid style switch:X)
   gnatmake: "dbprog.adb" compilation error

which is different .. yes, 4.0.0 says

   $ GNAT_PREFIX=/opt/4.0.0 gnatmake -g -gnat05 dbprog -f -gnatyX
   gcc -c -g -gnat05 -gnatyX dbprog.adb
   gnat1: invalid switch: y
   gnatmake: "dbprog.adb" compilation error

> You may want to just remove -gnaty.... , as this switch is only
> useful for the author of the software.

but you ought to be using it for your own software. Much easier,
though, to just say -gnaty and be done with it! So what if your lines
are restricted to 79 characters, I say, with any luck you can get 2
editor windows side-by-side and see even more code at once ..

That A in the original set looks odd. Try gnatmake -h to see your
legal set.

-gnatwae turns on most optional warnings (good) and treats them as
 errors (harsh).

--S

Re: ANN: QtAda preview available

[Martin Krischik]

Simon Wright wrote:

> That A in the original set looks odd. Try gnatmake -h to see your
> legal set.

It's a PRO one:

  -gnatyxx  Enable selected style checks xx = list of parameters:
        1-9  check indentation
        a    check attribute casing
        A    check array attribute indexes
        b    check no blanks at end of lines
        c    check comment format
        d    check no DOS line terminators
        e    check end/exit labels present
        f    check no form feeds/vertical tabs in source
        h    check no horizontal tabs in source
        i    check if-then layout
        I    check mode in
        k    check casing rules for keywords
        l    check reference manual layout
        Lnn  check max nest level < nn
        m    check line length <= 79 characters
        n    check casing of package Standard identifiers
        Mnn  check line length <= nn  characters
        o    check subprogram bodies in alphabetical order
        p    check pragma casing
        r    check casing for identifier references
        s    check separate subprogram specs present
        t    check token separation rules
        u    check no unnecessary blank lines
        x    check extra parentheses around conditionals

Martin
-- 
mailto://krischik@users.sourceforge.net
Ada programming at: http://ada.krischik.com

Re: ANN: QtAda preview available

[Dirk Heinrichs]

Ludovic Brenta wrote:

> You may want to just remove -gnaty.... , as this switch is only useful
> for the author of the software.

Did this, but then I get

make[3]: Entering directory
`/home/heini/tmp/qtada-0.1.0-20070412-6841/source/core'
/bin/sh ../../libtool --tag=CC --mode=compile ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatwae -I. -I.
qt4-child_events-constructors.adb
mkdir .libs
 ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatwae -I. -I.
qt4-child_events-constructors.adb  -fPIC -DPIC -o .libs/qt4-child_events-constructors.o
qt4-child_events-constructors.adb:70:39: invalid tagged conversion, not
compatible with type "Q_Event'Class" defined at qt4-events.ads:174
qt4-child_events-constructors.adb:73:40: expected an access type with
designated type "Q_Object_Impl" defined at qt4-objects-impl.ads:105
qt4-child_events-constructors.adb:73:40: found type "Q_Object_Impl'Class"
defined at qt4-objects-impl.ads:105
qt4-child_events-constructors.adb:79:36: (Ada 2005) does not implement
interface type "Q_Child_Event" defined at qt4-child_events.ads:44
make[3]: *** [qt4-child_events-constructors.lo] Fehler 1
make[3]: Leaving directory
`/home/heini/tmp/qtada-0.1.0-20070412-6841/source/core'

Bye...

        Dirk

Re: ANN: QtAda preview available

[vgodunko]

On Apr 14, 8:33 pm, Dirk Heinrichs <dirk.heinri...@online.de> wrote:
>
> It doesn't compile (Gentoo Linux, gnat-gcc 4.1.2):
>
> gnat1: invalid switch: y
Thanks for your report!

We are suppress passing of style check switches to compiler in
nonmaintainer mode build.

Re: ANN: QtAda preview available

[Martin Krischik]

vgodunko@rostel.ru wrote:

> Hello,
> 
> QtAda is an Ada2005 language bindings to Qt 4.2. Its allow easly
> create powerfull graphical user interface on Ada. QtAda use native
> thread safe signal/slot mechanism, provide access to more than 70 Qt
> classes, provide Ada-aware meta object compiler, support development
> of custom widgets and Qt Designer's custom widget plugins, support
> loading at runtime of GUI forms from Qt Designer's UI files and so on.
> 
> Current snapshort available at
> 
> http://sourceforge.net/projects/qtada/

Which compiler are you using?

You see:

-------- GCC 4.2 Snapshot ---------------
make  all-am
make[4]: Entering directory
`/work/gnuada/rpm/BUILD/gnat-gcc-qtada/x86_64-suse-linux/source/core'
/bin/sh ../../libtool --tag=CC --mode=compile ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyabcdefhikmoprstux -gnatwae -I../../../qtada-0.1.0-20070413-6865/source/core -I. ../../../qtada-0.1.0-20070413-6865/source/core/qt4-child_events-constructors.adb
 ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyabcdefhikmoprstux -gnatwae -I../../../qtada-0.1.0-20070413-6865/source/core -I. ../../../qtada-0.1.0-20070413-6865/source/core/qt4-child_events-constructors.adb  -fPIC -DPIC -o .libs/qt4-child_events-constructors.o
qt4-child_events-constructors.adb:70:39: invalid tagged conversion, not
compatible with type "Q_Event'Class" defined at qt4-events.ads:174
make[4]: *** [qt4-child_events-constructors.lo] Fehler 1
make[4]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gcc-qtada/x86_64-suse-linux/source/core'
make[3]: *** [all] Fehler 2
make[3]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gcc-qtada/x86_64-suse-linux/source/core'
make[2]: *** [all-recursive] Fehler 1
make[2]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gcc-qtada/x86_64-suse-linux/source'
make[1]: *** [all-recursive] Fehler 1
make[1]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gcc-qtada/x86_64-suse-linux'
error: Bad exit status from /var/tmp/rpm-tmp.7591 (%build)


RPM build errors:
    Bad exit status from /var/tmp/rpm-tmp.7591 (%build)
if [ -x /opt/gnat/tools/bin/vim ] ; then 
LD_LIBRARY_PATH='/opt/gnat/tools/lib'
nice --adjustment=0 /opt/gnat/tools/bin/vim -g -M
+ --servername "RPM-Build-Logs
linux2" --remote-silent "../LOGS/gnat-gcc-qtada-4.2.log" & fi
--------------------------------------------------


-------- GPL 2006 --------------------------
make  all-am
make[4]: Entering directory
`/work/gnuada/rpm/BUILD/gnat-gpl-qtada/x86_64-suse-linux/source/core'
/bin/sh ../../libtool --tag=CC --mode=compile ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyabcdefhikmoprstux -gnatwae -I../../../qtada-0.1.0-20070413-6865/source/core -I. ../../../qtada-0.1.0-20070413-6865/source/core/qt4-child_events-constructors.adb
mkdir .libs
 ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyabcdefhikmoprstux -gnatwae -I../../../qtada-0.1.0-20070413-6865/source/core -I. ../../../qtada-0.1.0-20070413-6865/source/core/qt4-child_events-constructors.adb  -fPIC -DPIC -o .libs/qt4-child_events-constructors.o
qt4-child_events-constructors.adb:70:39: invalid tagged conversion, not
compatible with type "Q_Event'Class" defined at qt4-events.ads:174
qt4-child_events-constructors.adb:73:40: expected an access type with
designated type "Q_Object_Impl" defined at qt4-objects-impl.ads:105
qt4-child_events-constructors.adb:73:40: found type "Q_Object_Impl'Class"
defined at qt4-objects-impl.ads:105
qt4-child_events-constructors.adb:79:36: (Ada 2005) does not implement
interface type "Q_Child_Event" defined at qt4-child_events.ads:44
make[4]: *** [qt4-child_events-constructors.lo] Fehler 1
make[4]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gpl-qtada/x86_64-suse-linux/source/core'
make[3]: *** [all] Fehler 2
make[3]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gpl-qtada/x86_64-suse-linux/source/core'
make[2]: *** [all-recursive] Fehler 1
make[2]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gpl-qtada/x86_64-suse-linux/source'
make[1]: *** [all-recursive] Fehler 1
make[1]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-gpl-qtada/x86_64-suse-linux'
error: Bad exit status from /var/tmp/rpm-tmp.68427 (%build)


RPM build errors:
    Macro %Gnat_patch_version has empty body
    Bad exit status from /var/tmp/rpm-tmp.68427 (%build)
if [ -x /opt/gnat/tools/bin/vim ] ; then 
LD_LIBRARY_PATH='/opt/gnat/tools/lib'
nice --adjustment=0 /opt/gnat/tools/bin/vim -g -M
+ --servername "RPM-Build-Logs
linux2" --remote-silent "../LOGS/gnat-gpl-qtada-2006.log"        & fi
--------------------------------------------------


-------- PRO 6.0.1 --------------------------
/bin/sh ../../libtool --tag=CC --mode=compile ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyabcdefhikmoprstux -gnatwae -I../../../qtada-0.1.0-20070413-6865/source/core -I. ../../../qtada-0.1.0-20070413-6865/source/core/qt4-abstract_item_models-impl.adb
 ../../adacompiler -c -O0 -gnat05 -gnatW8 -gnatyabcdefhikmoprstux -gnatwae -I../../../qtada-0.1.0-20070413-6865/source/core -I. ../../../qtada-0.1.0-20070413-6865/source/core/qt4-abstract_item_models-impl.adb  -fPIC -DPIC -o .libs/qt4-abstract_item_models-impl.o
+===========================GNAT BUG DETECTED==============================+
| Pro 6.0.1 (20070117-41) (x86_64-suse-linux-gnu) Assert_Failure
atree.adb:914|
| Error detected at qt4-abstract_item_models-impl.adb:483:7                |
| Please submit a bug report using GNAT Tracker:                           |
| http://www.adacore.com/gnattracker/ section 'send a report'.             |
| alternatively submit a bug report by email to report@adacore.com,        |
| including your customer number #nnn in the subject line.                 |
| Use a subject line meaningful to you and us to track the bug.            |
| Include the entire contents of this bug box in the report.               |
| Include the exact gcc or gnatmake command that you entered.              |
| Also include sources listed below in gnatchop format                     |
| (concatenated together with no headers between files).                   |
| Use plain ASCII or MIME attachment.                                      |
+==========================================================================+

Please include these source files with error report
Note that list may not be accurate in some cases,
so please double check that the problem can still
be reproduced with the set of files listed.

../../../qtada-0.1.0-20070413-6865/source/core/qt4-abstract_item_models-impl.adb
../../../qtada-0.1.0-20070413-6865/source/core/qt4-abstract_item_models-impl.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-abstract_item_models.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4_generic_flags.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-model_indexes.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4_entities.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-model_indexes-constructors.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-objects.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-events.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-meta_objects.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-generic_arguments.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-generic_return_arguments.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-strings.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-variants.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-child_events.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-objects-impl.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-events-impl.ads
../../../qtada-0.1.0-20070413-6865/source/core/qt4-timer_events.ads

compilation abandoned
make[4]: *** [qt4-abstract_item_models-impl.lo] Fehler 1
make[4]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-pro-qtada/x86_64-suse-linux/source/core'
make[3]: *** [all] Fehler 2
make[3]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-pro-qtada/x86_64-suse-linux/source/core'
make[2]: *** [all-recursive] Fehler 1
make[2]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-pro-qtada/x86_64-suse-linux/source'
make[1]: *** [all-recursive] Fehler 1
make[1]: Leaving directory
`/work/gnuada/rpm/BUILD/gnat-pro-qtada/x86_64-suse-linux'
error: Bad exit status from /var/tmp/rpm-tmp.79946 (%build)


RPM build errors:
    Bad exit status from /var/tmp/rpm-tmp.79946 (%build)
if [ -x /opt/gnat/tools/bin/vim ] ; then 
LD_LIBRARY_PATH='/opt/gnat/tools/lib'
nice --adjustment=0 /opt/gnat/tools/bin/vim -g -M
+ --servername "RPM-Build-Logs
linux2" --remote-silent "../LOGS/gnat-pro-qtada-6.0.1.log"       & fi
--------------------------------------------------

Now I would really love to add qtada to The GNU Ada Project [1]. So where is
the trick?

Martin

[1] http://gnuada.sf.net
-- 
mailto://krischik@users.sourceforge.net
Ada programming at: http://ada.krischik.com

Re: ANN: QtAda preview available

[vgodunko]

On Apr 15, 1:28 pm, Martin Krischik <krisc...@users.sourceforge.net>
wrote:
>
> Which compiler are you using?
>
GNAT Pro 6.1.0w (20070321-41)

This is minimum GNAT version which able to compile QtAda :(

Re: ANN: QtAda preview available

[Martin Krischik]

vgodunko@rostel.ru schrieb:
> On Apr 15, 1:28 pm, Martin Krischik <krisc...@users.sourceforge.net>
> wrote:
>> Which compiler are you using?
>>
> GNAT Pro 6.1.0w (20070321-41)
> 
> This is minimum GNAT version which able to compile QtAda :(

A "wavefront" compiler. Now you are aware that wavefront are specialy 
made for your project. We only can hope the patches make it into GPL 
2007 - which AdaCore currently prepares. Otherwise we need to wait for 
GCC 4.3.0 and GPL 2008 for QtAda :-( .

Martin

Re: ANN: QtAda preview available

[Georg Bauhaus]

On Mon, 2007-04-16 at 09:22 +0200, Martin Krischik wrote:
> vgodunko@rostel.ru schrieb:
> > On Apr 15, 1:28 pm, Martin Krischik <krisc...@users.sourceforge.net>
> > wrote:
> >> Which compiler are you using?
> >>
> > GNAT Pro 6.1.0w (20070321-41)
> > 
> > This is minimum GNAT version which able to compile QtAda :(
> 
> A "wavefront" compiler. Now you are aware that wavefront are specialy 
> made for your project. We only can hope the patches make it into GPL 
> 2007 - which AdaCore currently prepares. Otherwise we need to wait for 
> GCC 4.3.0 and GPL 2008 for QtAda :-( .

Some of the issues (the style checks can be disable by something
like
  find . -name Makefile\*  | \
	xargs perl -pi'*_orig' -e 's/-gnatyaA/-gnatya/'
prior to running configure)
seem to be caused by heavy use of 2005 style access together
with type conversions of .all objects. Is this by necessity,
or is it more like a consequence of translating C++ style
references into Ada access parameters? (Maybe then the binding
can profit from cont T& correspond to just "in", not "access
not null"?)

Re: ANN: QtAda preview available

[vgodunko]

On Apr 16, 7:40 pm, Georg Bauhaus <bauh...@futureapps.de> wrote:
> Some of the issues
> seem to be caused by heavy use of 2005 style access together
> with type conversions of .all objects. Is this by necessity,
> or is it more like a consequence of translating C++ style
> references into Ada access parameters? (Maybe then the binding
> can profit from cont T& correspond to just "in", not "access
> not null"?)
Such type conversions not related to argument passing conventions, its
a part of bindings architecture. It is possible to replace anonymous
access types and avoid conversions of .all objects, but this will
require to declare too many named access types.