webapps.wiki: adding search bar

[factor.git] / vm / write_barrier.hpp

diff --git a/vm/write_barrier.hpp b/vm/write_barrier.hpp
old mode 100755 (executable)
new mode 100644 (file)
index d434bf2..2dda022
--- a/vm/write_barrier.hpp
+++ b/vm/write_barrier.hpp
@@ -1,37 +1,33 @@
-/* card marking write barrier. a card is a byte storing a mark flag,
-and the offset (in cells) of the first object in the card.
+// card marking write barrier. a card is a byte storing a mark flag,
+// and the offset (in cells) of the first object in the card.
 
-the mark flag is set by the write barrier when an object in the
-card has a slot written to.
+// the mark flag is set by the write barrier when an object in the
+// card has a slot written to.
 
-the offset of the first object is set by the allocator. */
+// the offset of the first object is set by the allocator.
 
-namespace factor
-{
+namespace factor {
 
-/* if card_points_to_nursery is set, card_points_to_aging must also be set. */
+// if card_points_to_nursery is set, card_points_to_aging must also be set.
 static const cell card_points_to_nursery = 0x80;
 static const cell card_points_to_aging = 0x40;
-static const cell card_mark_mask = (card_points_to_nursery | card_points_to_aging);
-typedef u8 card;
+static const cell card_mark_mask =
+    (card_points_to_nursery | card_points_to_aging);
+typedef uint8_t card;
 
 static const cell card_bits = 8;
-static const cell card_size = (1<<card_bits);
-static const cell addr_card_mask = (card_size-1);
+static const cell card_size = 1 << card_bits;
+static const cell addr_card_mask = card_size - 1;
 
-typedef u8 card_deck;
+typedef uint8_t card_deck;
 
-static const cell deck_bits = (card_bits + 10);
-static const cell deck_size = (1<<deck_bits);
-static const cell addr_deck_mask = (deck_size-1);
+static const cell deck_bits = card_bits + 10;
+// Number of bytes on the heap a deck addresses. Each deck as 1024
+// cards. So 256 kb.
+static const cell deck_size = 1 << deck_bits;
+static const cell cards_per_deck = 1 << 10;
 
-inline cell addr_to_card(cell a)
-{
-       return a >> card_bits;
-}
+inline cell addr_to_card(cell a) { return a >> card_bits; }
 
-inline cell addr_to_deck(cell a)
-{
-       return a >> deck_bits;
-}
+inline cell addr_to_deck(cell a) { return a >> deck_bits; }
 }