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

diff --git a/ltt/branches/poly/ltt/parser.c b/ltt/branches/poly/ltt/parser.c
index 8017e3f10d1c6a22ed4b9877e4aac616b51b014d..fa786985316e015a880f4ad6c0db0153c23f16eb 100644 (file)
--- a/ltt/branches/poly/ltt/parser.c
+++ b/ltt/branches/poly/ltt/parser.c
@@ -497,10 +497,9 @@ type_descriptor *parseType(parse_file *in, type_descriptor *inType,
        free(str);
        str = appendString(str1,token);
        free(str1);
-       sequence_push(&(t->labels),allocAndCopy(str));
-       free(str);
+       sequence_push(&(t->labels),str);
       }else
-       sequence_push(&(t->labels),allocAndCopy(str));
+       sequence_push(&(t->labels),str);
 
       getForwardslash(in);
       getRAnglebracket(in);