Re: gnade error

["Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>]

On Tue, 14 Nov 2006 19:08:28 +1100, Brian May wrote:

> What does the following error mean:
> 
> make core-all >>build.log
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/prep" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/cfgget" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/cfgset" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/prep" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/cfgget" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/cfgset" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/prep" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/cfgget" up to date.
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-libexec/cfgset" up to date.
> completed 1 out of 6 (16%)...
> completed 2 out of 6 (33%)...
> completed 3 out of 6 (50%)...
> completed 4 out of 6 (66%)...
> completed 5 out of 6 (83%)...
> completed 6 out of 6 (100%)...
> gnatmake: objects up to date.
> make odbc-all >>build.log
> gcc-4.1 -c -g -gnatQ -I/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/linux-gnu-powerpc-include -g -O3 -gnatn -gnatf -gnatwa -gnatwL -gnaty3abefhiklM120prtn -I- -gnatA /home/bam/tmp/ada/gnade/gnade-src-1.5.3b/dbi/odbc/gnu-db-sqlcli-dispatch-a_array.adb
> gnu-db-sqlcli.adb:134:42: cannot inline "To_Ada" (call returns unconstrained type)
> gnatmake: "/home/bam/tmp/ada/gnade/gnade-src-1.5.3b/dbi/odbc/gnu-db-sqlcli-dispatch-a_array.adb" compilation error
> make[3]: *** [all] Error 4
> make[2]: *** [odbc] Error 2
> make[1]: *** [odbc-all] Error 2
> make: *** [all] Error 2
> 
> The code in question is:
> 
>    function To_Ada (State : C_SQLSTATE) return SQLSTATE is
>       use Ada.Strings.Fixed;
>       S : constant String := Interfaces.C.To_Ada (State, False);
>       R : SQLSTATE;
>    begin
>       Move (Source => S, Target => R);
>       SQLFixNTS (R);
>       return R;
>    end To_Ada;
> 
> It looks OK to me...

[ I had submitted this to GNADE, it was confirmed as a bug, but I am not
sure if that isn't actually a GNAT bug. ]

I rewrote it without all that conversion stuff, and it worked fine. After
all it is all about a 5-character C array being converted to a string!
(:-))

See:

http://sourceforge.net/tracker/index.php?func=detail&aid=1559830&group_id=23045&atid=377331

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de