vm: fix problem in card marking if first block is free

2009-11-16 00:52:32 -06:00 · 2009-11-16 00:52:32 -06:00 · cf35ffb126
parent d7e77650d8
commit cf35ffb126
1 changed files with 2 additions and 0 deletions
--- a/vm/data_heap.cpp
+++ b/vm/data_heap.cpp
@ -166,6 +166,8 @@ the GC. Some types have a binary payload at the end (string, word, DLL) which
 we ignore. */
 cell object::binary_payload_start() const
 {
+	if(free_p()) return 0;
+
 	switch(type())
 	{
 	/* these objects do not refer to other objects at all */