max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

fix(runtime/compact): bug at read

Browse source
This commit is contained in:
Leonardo de Moura 2018-08-28 10:30:51 -07:00
parent 161431e995
commit 4d6da3dd69
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/runtime/compact.cpp
View file

@ -280,9 +280,8 @@ object * compacted_region::read() {
lean_assert(static_cast<char*>(m_next) + sizeof(object) <= m_end);
object * curr = reinterpret_cast<object*>(m_next);
if (curr->m_kind == TERMINATOR_ID) {
move(sizeof(object));
object * r = *static_cast<object**>(m_next);
move(sizeof(object*));
object * r = *reinterpret_cast<object**>(static_cast<char*>(m_next) + sizeof(object));
move(sizeof(object) + sizeof(object*));
return fix_object_ptr(r);
} else {
switch (get_kind(curr)) {