Mercurial > hg > truffle
annotate src/share/vm/gc_implementation/concurrentMarkSweep/freeChunk.cpp @ 6087:e2961d14584b
7169934: pow(x,y) or x64 computes incorrect result when x<0 and y is an odd integer
Summary: bad test for parity of y in pow(x,y) (c1, interpreter)
Reviewed-by: kvn, twisti
author | roland |
---|---|
date | Mon, 21 May 2012 09:46:02 +0200 |
parents | 9f059abe8cf2 |
children | b9a9ed0f8eeb |
rev | line source |
---|---|
0 | 1 /* |
1972 | 2 * Copyright (c) 2001, 2010, Oracle and/or its affiliates. All rights reserved. |
0 | 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. |
4 * | |
5 * This code is free software; you can redistribute it and/or modify it | |
6 * under the terms of the GNU General Public License version 2 only, as | |
7 * published by the Free Software Foundation. | |
8 * | |
9 * This code is distributed in the hope that it will be useful, but WITHOUT | |
10 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
11 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License | |
12 * version 2 for more details (a copy is included in the LICENSE file that | |
13 * accompanied this code). | |
14 * | |
15 * You should have received a copy of the GNU General Public License version | |
16 * 2 along with this work; if not, write to the Free Software Foundation, | |
17 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. | |
18 * | |
1552
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1145
diff
changeset
|
19 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA |
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1145
diff
changeset
|
20 * or visit www.oracle.com if you need additional information or have any |
c18cbe5936b8
6941466: Oracle rebranding changes for Hotspot repositories
trims
parents:
1145
diff
changeset
|
21 * questions. |
0 | 22 * |
23 */ | |
24 | |
1972 | 25 #include "precompiled.hpp" |
6026 | 26 #include "gc_implementation/concurrentMarkSweep/freeChunk.hpp" |
27 #include "memory/freeBlockDictionary.hpp" | |
1972 | 28 #include "utilities/copy.hpp" |
0 | 29 |
30 #ifndef PRODUCT | |
31 | |
32 #define baadbabeHeapWord badHeapWordVal | |
33 #define deadbeefHeapWord 0xdeadbeef | |
34 | |
35 size_t const FreeChunk::header_size() { | |
36 return sizeof(FreeChunk)/HeapWordSize; | |
37 } | |
38 | |
39 void FreeChunk::mangleAllocated(size_t size) { | |
40 // mangle all but the header of a just-allocated block | |
41 // of storage | |
42 assert(size >= MinChunkSize, "smallest size of object"); | |
43 // we can't assert that _size == size because this may be an | |
44 // allocation out of a linear allocation block | |
45 assert(sizeof(FreeChunk) % HeapWordSize == 0, | |
46 "shouldn't write beyond chunk"); | |
47 HeapWord* addr = (HeapWord*)this; | |
48 size_t hdr = header_size(); | |
49 Copy::fill_to_words(addr + hdr, size - hdr, baadbabeHeapWord); | |
50 } | |
51 | |
187 | 52 void FreeChunk::mangleFreed(size_t sz) { |
0 | 53 assert(baadbabeHeapWord != deadbeefHeapWord, "Need distinct patterns"); |
54 // mangle all but the header of a just-freed block of storage | |
55 // just prior to passing it to the storage dictionary | |
187 | 56 assert(sz >= MinChunkSize, "smallest size of object"); |
57 assert(sz == size(), "just checking"); | |
0 | 58 HeapWord* addr = (HeapWord*)this; |
59 size_t hdr = header_size(); | |
187 | 60 Copy::fill_to_words(addr + hdr, sz - hdr, deadbeefHeapWord); |
0 | 61 } |
62 | |
63 void FreeChunk::verifyList() const { | |
64 FreeChunk* nextFC = next(); | |
65 if (nextFC != NULL) { | |
66 assert(this == nextFC->prev(), "broken chain"); | |
67 assert(size() == nextFC->size(), "wrong size"); | |
68 nextFC->verifyList(); | |
69 } | |
70 } | |
71 #endif | |
1145
e018e6884bd8
6631166: CMS: better heuristics when combatting fragmentation
ysr
parents:
196
diff
changeset
|
72 |
e018e6884bd8
6631166: CMS: better heuristics when combatting fragmentation
ysr
parents:
196
diff
changeset
|
73 void FreeChunk::print_on(outputStream* st) { |
e018e6884bd8
6631166: CMS: better heuristics when combatting fragmentation
ysr
parents:
196
diff
changeset
|
74 st->print_cr("Next: " PTR_FORMAT " Prev: " PTR_FORMAT " %s", |
e018e6884bd8
6631166: CMS: better heuristics when combatting fragmentation
ysr
parents:
196
diff
changeset
|
75 next(), prev(), cantCoalesce() ? "[can't coalesce]" : ""); |
e018e6884bd8
6631166: CMS: better heuristics when combatting fragmentation
ysr
parents:
196
diff
changeset
|
76 } |