Merge branch 'factor:master' into feature-vm-prepare-image-reserved-fields

[factor.git] / vm / layouts.hpp

diff --git a/vm/layouts.hpp b/vm/layouts.hpp
index 6c79aec31e708073b23835bb3ed099a898842ec3..4df0bd63a834d47c0b5a16879606622ea541dd95 100644 (file)
--- a/vm/layouts.hpp
+++ b/vm/layouts.hpp
@@ -106,10 +106,10 @@ struct object {
   // bit 0      : free?
   // bit 1      : forwarding pointer?
   // if not forwarding:
-  //   bit 2-5    : tag
-  //   bit 7-end  : hashcode
+  //   bit 2..5    : tag
+  //   bit 6..end  : hashcode
   // if forwarding:
-  //   bit 2-end  : forwarding pointer
+  //   bit 2..end  : forwarding pointer
   cell header;
 
   template <typename Fixup> cell base_size(Fixup fixup) const;
@@ -242,6 +242,7 @@ struct word : public object {
 // Assembly code makes assumptions about the layout of this struct
 struct wrapper : public object {
   static const cell type_number = WRAPPER_TYPE;
+  // TAGGED
   cell object;
 };