pragma Ada_2012;
pragma Ada_2012;
with System;
limited with dds.DataReader;
limited with dds.DataWriter;
package DDS.MetpTypeSupport is
type Ref is limited interface;
type Ref_Access is access all Ref'Class;
function Metp_Supported (This : Ref) return Standard.Boolean is abstract;
procedure DataWriter_Create_Metp_Data
(This : Ref;
Writer : access DDS.DataWriter.Ref'class;
Sample : out System.Address;
Initialize_Data : out Standard.Boolean) is abstract;
procedure DataWriter_Delete_Metp_Data
(This : Ref;
Writer : access DDS.DataWriter.Ref'class;
Sample : System.Address) is abstract;
function DataWriter_Is_Metp_Writer
(This : Ref;
Writer : access DDS.DataWriter.Ref'class) return Standard.Boolean is abstract;
procedure DataWriter_Write_Metp_Data
(This : Ref;
Writer : access DDS.DataWriter.Ref'class;
Sample : System.Address;
Handle : DDS.InstanceHandle_T_Access;
W_Params : DDS.WriteParams_T_Access) is abstract;
function DataReader_Is_Metp_Data_Consistent
(This : Ref;
Reader : access DDS.DataReader.Ref'Class;
Sample : System.Address;
Sample_Info : DDS.SampleInfo_Access) return Standard.Boolean is abstract;
end DDS.MetpTypeSupport;