Add allocateInGen() for allocating in a specific generation, and cleanups

Now allocate() is a synonym for allocateInGen().  

I also made various cleanups: there is now less special-case code for
supporting -G1 (two-space collection), and -G1 now works with
-threaded.

1 files changed, 0 insertions, 7 deletions

diff --git a/rts/ProfHeap.c b/rts/ProfHeap.c
index 08597b1d98..599b479c8d 100644
--- a/rts/ProfHeap.c
+++ b/rts/ProfHeap.c
@@ -1151,13 +1151,6 @@ heapCensus( void )
 #endif
 
   // Traverse the heap, collecting the census info
-
-  // First the small_alloc_list: we have to fix the free pointer at
-  // the end by calling tidyAllocatedLists() first.
-  tidyAllocateLists();
-  heapCensusChain( census, small_alloc_list );
-
-  // Now traverse the heap in each generation/step.
   if (RtsFlags.GcFlags.generations == 1) {
       heapCensusChain( census, g0s0->blocks );
   } else {