1 files changed, 54 insertions, 0 deletions
diff --git a/plugins/pychrysalide/helpers.c b/plugins/pychrysalide/helpers.c
index c31d9f1..0c84278 100644
--- a/plugins/pychrysalide/helpers.c
+++ b/plugins/pychrysalide/helpers.c
@@ -1122,6 +1122,60 @@ int forward_pygobjet_init(PyObject *self)
 
 /******************************************************************************
 *                                                                             *
+*  Paramètres  : type = type Python à ausculter.                              *
+*                                                                             *
+*  Description : Détermine si un type Python est implémenté en C ou non.      *
+*                                                                             *
+*  Retour      : Bilan de l'analyse.                                          *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool pytype_has_native_implementation(const PyTypeObject *type)
+{
+    bool result;                            /* Bilan à retourner           */
+    GType gtype;                            /* Type associé à la classe    */
+
+    static GQuark pygobject_custom_key = 0; /* Clef d'accès direct         */
+
+    /**
+     * Dans les sources de PyGObject, la fonction pyg_type_register() de
+     * gi/gimodule.c, appelée depuis gi/types.py, contient la bribe de code
+     * suivante :
+     *
+     *    // Mark this GType as a custom python type
+     *    g_type_set_qdata(instance_type, pygobject_custom_key,
+     *                     GINT_TO_POINTER (1));
+     *
+     * La fonction pyi_object_register_types() de gi/pygobject-object.c indique
+     * la clef associée au Quark :
+     *
+     *    pygobject_custom_key = g_quark_from_static_string("PyGObject::custom");
+     *
+     * Enfin, une fonction inspirante est codée dans le fichier gi/pygi-type.c :
+     *
+     *    gboolean pyg_gtype_is_custom(GType gtype)
+     *    {
+     *        return g_type_get_qdata (gtype, pygobject_custom_key) != NULL;
+     *    }
+     *
+     */
+
+    if (pygobject_custom_key == 0)
+        pygobject_custom_key = g_quark_from_static_string("PyGObject::custom");
+
+    gtype = pyg_type_from_object((PyObject *)type);
+
+    result = (g_type_get_qdata(gtype, pygobject_custom_key) == NULL);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
 *  Paramètres  : arg = argument quelconque à tenter de convertir.             *
 *                dst = destination des valeurs récupérées en cas de succès.   *
 *                                                                             *