git-svn-id: http://ltt.polymtl.ca/svn@132 04897980-b3bd-0310-b5e0-8ef037075253

[lttv.git] / ltt / branches / poly / ltt / facility.c

diff --git a/ltt/branches/poly/ltt/facility.c b/ltt/branches/poly/ltt/facility.c
index 7efcbce08895af9caed18878fd5e1e70d6f994cc..13781668ad00482d16ee754ca3f5eb97286ac3df 100644 (file)
--- a/ltt/branches/poly/ltt/facility.c
+++ b/ltt/branches/poly/ltt/facility.c
@@ -89,7 +89,7 @@ void ltt_facility_open(LttTrace * t, char * pathname)
       table_dispose(&fac->named_types);
       freeTypes(&fac->unnamed_types);
       sequence_dispose(&fac->unnamed_types);      
-      free(fac);
+      g_free(fac);
     }
     else in.error(&in,"facility token was expected");
   }
@@ -153,11 +153,12 @@ void generateFacility(LttFacility *f, facility *fac,LttChecksum checksum)
       field->parent = NULL;
       field->child = NULL;
       field->current_element = 0;
-      
+
       //construct field tree and type graph
       constructTypeAndFields(f,((event*)(events->array[i]))->type,field);
     }else{
-      evType->root_field = NULL;      
+      evType->root_field = NULL;
+      sequence_pop(&(f->all_fields));
       g_free(field);
     }
   }