diff options
| author | Richard Kistruck | 2008-11-07 13:37:23 +0000 |
|---|---|---|
| committer | Richard Kistruck | 2008-11-07 13:37:23 +0000 |
| commit | 2d3ffb7ca5833dfe0c407f5adeb50a5f4ab53280 (patch) | |
| tree | e656f5332f63ac728b6efec821ff7ba4199daf57 /mps/code/amcss.c | |
| parent | b3b771bceb3472d8f4421a341c5e58f6b27b1921 (diff) | |
| download | emacs-2d3ffb7ca5833dfe0c407f5adeb50a5f4ab53280.tar.gz emacs-2d3ffb7ca5833dfe0c407f5adeb50a5f4ab53280.zip | |
Mps br/timing: (tabs) amcss.c
Copied from Perforce
Change: 166670
ServerID: perforce.ravenbrook.com
Diffstat (limited to 'mps/code/amcss.c')
| -rw-r--r-- | mps/code/amcss.c | 42 |
1 files changed, 21 insertions, 21 deletions
diff --git a/mps/code/amcss.c b/mps/code/amcss.c index 76a5088360f..d7946a74bcf 100644 --- a/mps/code/amcss.c +++ b/mps/code/amcss.c | |||
| @@ -63,24 +63,24 @@ static void report(mps_arena_t arena) | |||
| 63 | /* @@@@ is using these macros in a switch supported? */ | 63 | /* @@@@ is using these macros in a switch supported? */ |
| 64 | case mps_message_type_gc(): | 64 | case mps_message_type_gc(): |
| 65 | { | 65 | { |
| 66 | size_t live, condemned, not_condemned; | 66 | size_t live, condemned, not_condemned; |
| 67 | 67 | ||
| 68 | live = mps_message_gc_live_size(arena, message); | 68 | live = mps_message_gc_live_size(arena, message); |
| 69 | condemned = mps_message_gc_condemned_size(arena, message); | 69 | condemned = mps_message_gc_condemned_size(arena, message); |
| 70 | not_condemned = mps_message_gc_not_condemned_size(arena, message); | 70 | not_condemned = mps_message_gc_not_condemned_size(arena, message); |
| 71 | 71 | ||
| 72 | printf("\nCollection %d finished:\n", ++nCollections); | 72 | printf("\nCollection %d finished:\n", ++nCollections); |
| 73 | printf("live %lu\n", (unsigned long)live); | 73 | printf("live %lu\n", (unsigned long)live); |
| 74 | printf("condemned %lu\n", (unsigned long)condemned); | 74 | printf("condemned %lu\n", (unsigned long)condemned); |
| 75 | printf("not_condemned %lu\n", (unsigned long)not_condemned); | 75 | printf("not_condemned %lu\n", (unsigned long)not_condemned); |
| 76 | 76 | ||
| 77 | if(condemned > (gen1SIZE + gen2SIZE + (size_t)128) * 1024) { | 77 | if(condemned > (gen1SIZE + gen2SIZE + (size_t)128) * 1024) { |
| 78 | /* When condemned size is larger than could happen in a gen 2 | 78 | /* When condemned size is larger than could happen in a gen 2 |
| 79 | * collection (discounting ramps, natch), guess that was a dynamic | 79 | * collection (discounting ramps, natch), guess that was a dynamic |
| 80 | * collection, and reset the commit limit, so it doesn't run out. */ | 80 | * collection, and reset the commit limit, so it doesn't run out. */ |
| 81 | die(mps_arena_commit_limit_set(arena, 2 * testArenaSIZE), | 81 | die(mps_arena_commit_limit_set(arena, 2 * testArenaSIZE), |
| 82 | "set limit"); | 82 | "set limit"); |
| 83 | } | 83 | } |
| 84 | } | 84 | } |
| 85 | break; | 85 | break; |
| 86 | case mps_message_type_gc_start(): | 86 | case mps_message_type_gc_start(): |
| @@ -215,9 +215,9 @@ static void *test(void *arg, size_t s) | |||
| 215 | if (collections == collectionsCOUNT / 2) { | 215 | if (collections == collectionsCOUNT / 2) { |
| 216 | unsigned long object_count = 0; | 216 | unsigned long object_count = 0; |
| 217 | mps_arena_park(arena); | 217 | mps_arena_park(arena); |
| 218 | mps_arena_formatted_objects_walk(arena, test_stepper, &object_count, 0); | 218 | mps_arena_formatted_objects_walk(arena, test_stepper, &object_count, 0); |
| 219 | mps_arena_release(arena); | 219 | mps_arena_release(arena); |
| 220 | printf("stepped on %lu objects.\n", object_count); | 220 | printf("stepped on %lu objects.\n", object_count); |
| 221 | } | 221 | } |
| 222 | if (collections == rampSwitch) { | 222 | if (collections == rampSwitch) { |
| 223 | int begin_ramp = !ramping | 223 | int begin_ramp = !ramping |