Index

Package: Generic_Marshaller_2 (generic)

Description

generic
         type Base_Type_1 is private;
         with function Conversion
           (Value : Glib.Values.GValue) return Base_Type_1;
         type Base_Type_2 is private;
         with function Conversion
           (Value : Glib.Values.GValue) return Base_Type_2;

      package Generic_Marshaller_2 is

Types

Base_Type_1

type Base_Type_1 is private;

Base_Type_2

type Base_Type_2 is private;

Handler

type Handler is access procedure
           (Widget    : access Widget_Type'Class;
            Param_1   : Base_Type_1;
            Param_2   : Base_Type_2;
            User_Data : User_Type);

Subprograms & Entries

Conversion

function Conversion 
(Value: Glib.Values.GValue) return Base_Type_1;

Conversion

function Conversion 
(Value: Glib.Values.GValue) return Base_Type_2;

To_Marshaller

function To_Marshaller 
(Cb: Handler) return Marshaller;

Emit_By_Name

procedure Emit_By_Name 
(Object: access Widget_Type'Class;
Name: Glib.Signal_Name;
Param_1: Base_Type_1;
Param_2: Base_Type_2);
The function above should be used when BASE_TYPE can be passed as is to C.

Emit_By_Name_Generic (generic)

generic with function Conversion 
(Param: Base_Type_1) return System.Address;
with function Conversion (Param: Base_Type_2) return System.Address;
procedure Emit_By_Name_Generic (Object: access Widget_Type'Class;
Name: Glib.Signal_Name;
Param_1: Base_Type_1;
Param_2: Base_Type_2);
Provide an explicit conversion function for PARAM.