Enlarge gc header to doubly-link the gc chain.
This commit is contained in:
parent
5dfe101e51
commit
63b5e18207
@ -29,15 +29,16 @@ let frame_glue_fns_field_reloc = 2;;
|
|||||||
let exterior_rc_slot_field_refcnt = 0;;
|
let exterior_rc_slot_field_refcnt = 0;;
|
||||||
let exterior_rc_slot_field_body = 1;;
|
let exterior_rc_slot_field_body = 1;;
|
||||||
|
|
||||||
|
let exterior_gc_slot_field_prev = (-3);;
|
||||||
let exterior_gc_slot_field_next = (-2);;
|
let exterior_gc_slot_field_next = (-2);;
|
||||||
let exterior_gc_slot_field_ctrl = (-1);;
|
let exterior_gc_slot_field_ctrl = (-1);;
|
||||||
let exterior_gc_slot_field_refcnt = 0;;
|
let exterior_gc_slot_field_refcnt = 0;;
|
||||||
let exterior_gc_slot_field_body = 1;;
|
let exterior_gc_slot_field_body = 1;;
|
||||||
|
|
||||||
let exterior_rc_header_size = 1;;
|
let exterior_rc_header_size = 1;;
|
||||||
let exterior_gc_header_size = 3;;
|
let exterior_gc_header_size = 4;;
|
||||||
|
|
||||||
let exterior_gc_malloc_return_adjustment = 2;;
|
let exterior_gc_malloc_return_adjustment = 3;;
|
||||||
|
|
||||||
let stk_field_valgrind_id = 0 + 1;;
|
let stk_field_valgrind_id = 0 + 1;;
|
||||||
let stk_field_limit = stk_field_valgrind_id + 1;;
|
let stk_field_limit = stk_field_valgrind_id + 1;;
|
||||||
|
Loading…
Reference in New Issue
Block a user