static type_t rootType = nullptr; /* the root type */
-void PJ_type_alloc ()
-{
-}
-
void PJ_type_release ()
{
rootType = nullptr;
char *value_name;
xbt_dict_cursor_t cursor = nullptr;
xbt_dict_foreach(type->values, cursor, value_name, value) {
- PJ_value_free (value);
+ XBT_DEBUG("free value %s, child of %s", value->name, value->father->name);
+ xbt_free(value->name);
+ xbt_free(value->color);
+ xbt_free(value->id);
+ xbt_free(value);
}
xbt_dict_free (&type->values);
xbt_free (type->name);
type = nullptr;
}
-static void recursiveDestroyType (type_t type)
+void recursiveDestroyType (type_t type)
{
XBT_DEBUG("recursiveDestroyType %s", type->name);
xbt_dict_cursor_t cursor = nullptr;
PJ_type_free(type);
}
-void PJ_type_free_all ()
-{
- recursiveDestroyType (PJ_type_get_root());
- rootType = nullptr;
-}
-
type_t PJ_type_get (const char *name, type_t father)
{
type_t ret = PJ_type_get_or_null (name, father);