1 files changed, 33 insertions, 1 deletions
diff --git a/plugins/pychrysalide/constval.c b/plugins/pychrysalide/constval.c
index 7067770..ab5b81f 100644
--- a/plugins/pychrysalide/constval.c
+++ b/plugins/pychrysalide/constval.c
@@ -26,6 +26,7 @@
 
 
 #include <longintrepr.h>
+#include <malloc.h>
 #include <string.h>
 
 
@@ -56,6 +57,9 @@ typedef struct _PyConstvalObject
 /* Interdit la création d'une instance depuis Python. */
 static PyObject *py_constval_new(PyTypeObject *, PyObject *, PyObject *);
 
+/* Libère la mémoire occupée par la description en sortie. */
+static void py_constval_finalize(PyObject *);
+
 /* Calcule l'emplacement reservé pour une désignation de valeur. */
 static char **py_constval_compute_name_ptr(PyConstvalObject *);
 
@@ -102,6 +106,32 @@ static PyObject *py_constval_new(PyTypeObject *type, PyObject *args, PyObject *k
 *                                                                             *
 *  Paramètres  : self = valeur constante C convertie en Python.               *
 *                                                                             *
+*  Description : Libère la mémoire occupée par la description en sortie.      *
+*                                                                             *
+*  Retour      : -                                                            *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+static void py_constval_finalize(PyObject *self)
+{
+    PyConstvalObject *constval;             /* Autre version de l'objet    */
+    char **ptr;                             /* Désignation à convertir     */
+
+    constval = (PyConstvalObject *)self;
+
+    ptr = py_constval_compute_name_ptr(constval);
+
+    free(*ptr);
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : self = valeur constante C convertie en Python.               *
+*                                                                             *
 *  Description : Calcule l'emplacement reservé pour une désignation de valeur.*
 *                                                                             *
 *  Retour      : Pointeur vers l'adresse de désignation.                      *
@@ -231,7 +261,7 @@ PyTypeObject *get_python_py_constval_type(void)
 
         .tp_str         = py_constval_str,
 
-        .tp_flags       = Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE,
+        .tp_flags       = Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE | Py_TPFLAGS_HAVE_FINALIZE,
 
         .tp_doc         = "PyChrysalide object for C constant values",
 
@@ -241,6 +271,8 @@ PyTypeObject *get_python_py_constval_type(void)
 
         .tp_new         = py_constval_new,
 
+        .tp_finalize    = py_constval_finalize,
+
     };
 
     return &py_constval_type;