{
XBT_DEBUG("%s not implemented for %p: event_type=%d, timestamp=%f", __FUNCTION__,
this, (int)event_type, timestamp);
-// xbt_backtrace_display_current();
-
- /* switch (event->event_type){
- case PAJE_StartLink:
- xbt_free (((startLink_t)(event->data))->value);
- xbt_free (((startLink_t)(event->data))->key);
- break;
- case PAJE_EndLink:
- xbt_free (((endLink_t)(event->data))->value);
- xbt_free (((endLink_t)(event->data))->key);
- break;
- default:
- break;
- }*/
}
void TRACE_paje_start() {
static type_t rootType = nullptr; /* the root type */
-void PJ_type_alloc ()
-{
-}
-
void PJ_type_release ()
{
rootType = nullptr;
}
-
type_t PJ_type_get_root ()
{
return rootType;
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);
+ //PJ_value_free (value);
}
xbt_dict_free (&type->values);
xbt_free (type->name);
}
return ret;
}
-
-void PJ_value_free (val_t value)
-{
- XBT_DEBUG("free value %s, child of %s", value->name, value->father->name);
- xbt_free(((val_t)value)->name);
- xbt_free(((val_t)value)->color);
- xbt_free(((val_t)value)->id);
- xbt_free(value);
-}
XBT_PUBLIC(void) PJ_container_remove_from_parent (container_t container);
/* instr_paje_types.c */
-XBT_PRIVATE void PJ_type_alloc ();
XBT_PRIVATE void PJ_type_release ();
XBT_PUBLIC(type_t) PJ_type_get_root ();
XBT_PRIVATE type_t PJ_type_container_new (const char *name, type_t father);
XBT_PUBLIC(val_t) PJ_value_new (const char *name, const char *color, type_t father);
XBT_PUBLIC(val_t) PJ_value_get_or_new (const char *name, const char *color, type_t father);
XBT_PUBLIC(val_t) PJ_value_get (const char *name, const type_t father);
-XBT_PRIVATE void PJ_value_free (val_t value);
XBT_PRIVATE void TRACE_TI_start();
XBT_PRIVATE void TRACE_TI_end();
if (PJ_container_get_root() == nullptr){
PJ_container_alloc ();
- PJ_type_alloc();
container_t root = PJ_container_new (id, INSTR_AS, nullptr);
PJ_container_set_root (root);