Be less strict and allow the declaration of an 'unconnected' connection.
This is e.g. required to use the type in a record field (which is
perfectly legal if the record is constructed correctly).
package D_Bus.Connection is
package D_Bus.Connection is
- type Connection_Type (<>) is limited private;
+ type Connection_Type is limited private;
-- D-Bus connection.
function Connect (Bus : Bus_Type := Bus_Session) return Connection_Type;
-- D-Bus connection.
function Connect (Bus : Bus_Type := Bus_Session) return Connection_Type;