Index: src/SymTab/ImplementationType.cc
===================================================================
--- src/SymTab/ImplementationType.cc	(revision 579263a52ab065d42a5208e15e3d707dd0d03798)
+++ src/SymTab/ImplementationType.cc	(revision 6242335009c5d2ebee1bb50d1d228f5aacb0e5bd)
@@ -5,5 +5,5 @@
 // file "LICENCE" distributed with Cforall.
 //
-// ImplementationType.cc -- 
+// ImplementationType.cc --
 //
 // Author           : Richard C. Bilson
@@ -92,11 +92,11 @@
 
 	void ImplementationType::visit(TupleType *tupleType) {
-		TupleType *newType = new TupleType( Type::Qualifiers() );
+		std::list< Type * > types;
 		for ( std::list< Type* >::iterator i = tupleType->get_types().begin(); i != tupleType->get_types().end(); ++i ) {
 			Type *implType = implementationType( *i, indexer );
 			implType->get_qualifiers() |= tupleType->get_qualifiers();
-			newType->get_types().push_back( implType );
+			types.push_back( implType );
 		} // for
-		result = newType;
+		result = new TupleType( Type::Qualifiers(), types );
 	}
 
