pragma Ada_05;
with System;
with RTIDDS.Low_Level.ndds_dds_c_dds_c_subscription_h; use RTIDDS.Low_Level.ndds_dds_c_dds_c_subscription_h;
package DDS.DataReaderListener.Low_Level is
type T_Requested_Deadline_Missed is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address;
Status : in DDS_RequestedDeadlineMissedStatus);
pragma Convention (C, T_Requested_Deadline_Missed);
type T_Requested_Incompatible_Qos is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address;
Status : in DDS_RequestedIncompatibleQosStatus);
pragma Convention (C, T_Requested_Incompatible_Qos);
type T_Sample_Rejected is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address;
Status : in DDS_SampleRejectedStatus);
pragma Convention (C, T_Sample_Rejected);
type T_Liveliness_Changed is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address;
Status : in DDS_LivelinessChangedStatus);
pragma Convention (C, T_Liveliness_Changed);
type T_Data_Available is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address);
pragma Convention (C, T_Data_Available);
type T_Subscription_Matched is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address;
Status : access constant DDS_SubscriptionMatchedStatus);
pragma Convention (C, T_Subscription_Matched);
type T_Sample_Lost is access procedure
(Listener_Data : System.Address;
C_Reader : System.Address;
Status : access constant DDS_SampleLostStatus);
pragma Convention (C, T_Sample_Lost);
procedure On_Requested_Deadline_Missed
(Listener : System.Address;
C_Reader : System.Address;
Status : access constant DDS_RequestedDeadlineMissedStatus);
pragma Convention (C, On_Requested_Deadline_Missed);
procedure On_Requested_Incompatible_Qos
(Listener : System.Address;
C_Reader : System.Address;
Status : access constant DDS_RequestedIncompatibleQosStatus);
pragma Convention (C, On_Requested_Incompatible_Qos);
procedure On_Sample_Rejected
(Listener : System.Address;
C_Reader : System.Address;
Status : access constant DDS_SampleRejectedStatus);
pragma Convention (C, On_Sample_Rejected);
procedure On_Liveliness_Changed
(Listener : System.Address;
C_Reader : System.Address;
Status : access constant DDS_LivelinessChangedStatus);
pragma Convention (C, On_Liveliness_Changed);
procedure On_Data_Available
(Listener : System.Address;
C_Reader : System.Address);
pragma Convention (C, On_Data_Available);
procedure On_Subscription_Matched
(Listener : System.Address;
C_Reader : System.Address;
Status : access constant DDS_SubscriptionMatchedStatus);
pragma Convention (C, On_Subscription_Matched);
procedure On_Sample_Lost
(Listener : System.Address;
C_Reader : System.Address;
Status : access constant DDS_SampleLostStatus);
pragma Convention (C, On_Sample_Lost);
C_DataReaderListener_DEFAULT : constant DDS_DataReaderListener :=
(as_listener => (listener_data => System.Null_Address),
on_requested_deadline_missed => On_Requested_Deadline_Missed'Access,
on_requested_incompatible_qos => On_Requested_Incompatible_Qos'Access,
on_sample_rejected => On_Sample_Rejected'Access,
on_liveliness_changed => On_Liveliness_Changed'Access,
on_data_available => On_Data_Available'Access,
on_subscription_matched => On_Subscription_Matched'Access,
on_sample_lost => On_Sample_Lost'Access);
end DDS.DataReaderListener.Low_Level;