Again CONSTRAINT_ERROR

[Distant Worlds <distantworldscorporation@gmail.com>]

Сode from example: 

with gnatcoll.SQL.Postgres;  
with gnatcoll.SQL.Exec;      
with Ada.Text_IO;            
 
procedure Main is
   DB_Descr : GNATCOLL.SQL.Exec.Database_Description;
   DB       : GNATCOLL.SQL.Exec.Database_Connection;
   IsOpen   : Boolean;
begin
   DB_Descr := GNATCOLL.SQL.Postgres.Setup(Database => "postgres",
                     User => "postgres",
                     Host => "localhost",
                     Password => "12345678",
                     Port => 5432
                    );
   DB := DB_Descr.Build_Connection;
 
   IsOpen := DB.Check_Connection;
   if IsOpen then
      Ada.Text_IO.Put_Line("Connection is open.");
   else
      Ada.Text_IO.Put_Line("Last Db error = " & DB.Error);
   end if;
 
   -- reset state of connection for reuse
   GNATCOLL.SQL.Exec.Reset_Connection(DB);
 
   GNATCOLL.SQL.Exec.Free (DB);
   GNATCOLL.SQL.Exec.Free (DB_Descr);
 
end Main;

It is compiled!

At runtime: raised CONSTRAINT_ERROR : main.adb:16 access check failed

What's wrong here?

Thanks!

P.S. Linux x64(Centos 7) GNAT GPS 2017