Unify allocator tests even more, also test arena

This commit is contained in:
dcodeIO
2018-03-04 17:25:32 +01:00
parent 4257273d42
commit 00c4f6fa52
36 changed files with 3463 additions and 2977 deletions

View File

@ -6,7 +6,7 @@
(type $iv (func (param i32)))
(type $v (func))
(import "env" "abort" (func $abort (param i32 i32 i32 i32)))
(global "$(lib)/allocator/arena/HEAP_OFFSET" (mut i32) (i32.const 0))
(global "$(lib)/allocator/arena/OFFSET" (mut i32) (i32.const 0))
(global $std/allocator_arena/ptr1 (mut i32) (i32.const 0))
(global $std/allocator_arena/ptr2 (mut i32) (i32.const 0))
(global $std/allocator_arena/i (mut i32) (i32.const 0))
@ -19,6 +19,7 @@
(local $1 i32)
(local $2 i32)
(local $3 i32)
(local $4 i32)
(if
(i32.eqz
(get_local $0)
@ -28,74 +29,73 @@
)
)
(if
(i32.and
(if (result i32)
(i32.gt_u
(tee_local $2
(i32.and
(i32.add
(i32.add
(tee_local $1
(get_global "$(lib)/allocator/arena/OFFSET")
)
(get_local $0)
)
(i32.const 7)
)
(i32.const -8)
)
)
(i32.shl
(tee_local $0
(i32.gt_u
(tee_local $2
(i32.and
(i32.add
(i32.add
(tee_local $3
(get_global "$(lib)/allocator/arena/HEAP_OFFSET")
(current_memory)
)
(i32.const 16)
)
)
(if
(i32.lt_s
(grow_memory
(select
(get_local $0)
(tee_local $4
(tee_local $3
(i32.shr_u
(i32.and
(i32.add
(i32.sub
(get_local $2)
(get_local $1)
)
(i32.const 65535)
)
(get_local $0)
(i32.const -65536)
)
(i32.const 7)
(i32.const 16)
)
(i32.const -8)
)
)
(tee_local $1
(i32.shl
(current_memory)
(i32.const 16)
)
(i32.gt_s
(get_local $0)
(get_local $4)
)
)
)
(i32.const 0)
)
(if
(i32.lt_s
(grow_memory
(select
(tee_local $0
(i32.shr_u
(i32.sub
(i32.and
(i32.add
(get_local $2)
(i32.const 65535)
)
(i32.const -65536)
)
(get_local $1)
)
(i32.const 16)
)
)
(tee_local $1
(i32.shr_u
(get_local $1)
(i32.const 16)
)
)
(i32.gt_u
(get_local $0)
(get_local $1)
)
)
(get_local $3)
)
(i32.const 0)
)
(get_local $0)
(unreachable)
)
(i32.const 1)
)
(unreachable)
)
(set_global "$(lib)/allocator/arena/HEAP_OFFSET"
(set_global "$(lib)/allocator/arena/OFFSET"
(get_local $2)
)
(get_local $3)
(get_local $1)
)
(func "$(lib)/memory/set_memory" (; 2 ;) (type $iiiv) (param $0 i32) (param $1 i32) (param $2 i32)
(local $3 i64)
@ -2360,13 +2360,25 @@
(nop)
)
(func "$(lib)/allocator/arena/reset_memory" (; 7 ;) (type $v)
(set_global "$(lib)/allocator/arena/HEAP_OFFSET"
(get_global $HEAP_BASE)
(set_global "$(lib)/allocator/arena/OFFSET"
(i32.and
(i32.add
(get_global $HEAP_BASE)
(i32.const 7)
)
(i32.const -8)
)
)
)
(func $start (; 8 ;) (type $v)
(set_global "$(lib)/allocator/arena/HEAP_OFFSET"
(get_global $HEAP_BASE)
(set_global "$(lib)/allocator/arena/OFFSET"
(i32.and
(i32.add
(get_global $HEAP_BASE)
(i32.const 7)
)
(i32.const -8)
)
)
(set_global $std/allocator_arena/ptr1
(call "$(lib)/allocator/arena/allocate_memory"
@ -2514,7 +2526,13 @@
(if
(i32.ne
(get_global $std/allocator_arena/ptr1)
(get_global $HEAP_BASE)
(i32.and
(i32.add
(get_global $HEAP_BASE)
(i32.const 7)
)
(i32.const -8)
)
)
(block
(call $abort