Problem (and solution) with gnatcoll_db2ada

[mockturtle <framefritti@gmail.com>]

Dear all,
maybe this is of some interest to few people, but I think it is worth documenting it.  

Recently I began working with AWS and GNATCOLL.SQL.  According to the documentation about the gnatcoll_db2ada tool

  http://docs.adacore.com/gnatcoll-docs/sql.html#the-gnatcoll-db2ada-tool

by using the option '-adacreate' gnatcoll_db2ada creates (in package Database) a procedure Create_Database that creates the database at runtime.  However, when I try to compile database.adb I get the following error

  database.adb:136:15: non-visible declaration at gnatcoll-sql-exec.ads:208

The problem is that the procedure Database_Connection called at the end of database.adb is in GNATCOLL.SQL.Exec, not visible from database.adb.

A "with + use" will, of course, cure the problem, but, as you can imagine, it gets pretty boring to add "with + use" every time you change your scheme (not often, fortunately, but it happens during the development...).  

Since I still have around the sources of gnatcoll_db2ada, I searched for the bug and I discovered that it suffices to add just one line in gnatcoll_db2ada-generate.adb

The following is the result of 

    diff gnatcoll_db2ada-generate.adb  gnatcoll_db2ada-generate.adb~

442,443d441
<          Put_Line
<            (Body_File, "with GNATCOLL.SQL.Exec; use GNATCOLL.SQL.Exec;");

in case you want to apply the correction yourself.   My version is quite new, I downloaded the source archive on Jan 18.

I hope this can be useful.

Best regards,

Riccardo Bernardini