diff options
Diffstat (limited to 'test/spec/table_fill.wast')
-rw-r--r-- | test/spec/table_fill.wast | 193 |
1 files changed, 108 insertions, 85 deletions
diff --git a/test/spec/table_fill.wast b/test/spec/table_fill.wast index 79b5a6a83..5471e2e23 100644 --- a/test/spec/table_fill.wast +++ b/test/spec/table_fill.wast @@ -1,115 +1,138 @@ (module - (type $f (func (result i32))) + (table $t 10 externref) - (table $t 10 funcref) - - (func $0 (result i32) - (i32.const 0) - ) - - (func $1 (result i32) - (i32.const 1) - ) - - (func $2 (result i32) - (i32.const 2) - ) - - (func $3 (result i32) - (i32.const 3) - ) - - (func $4 (result i32) - (i32.const 4) - ) - - (func (export "fill-0") (param $i i32) (param $n i32) - (table.fill $t (local.get $i) (ref.func $0) (local.get $n)) - ) - - (func (export "fill-1") (param $i i32) (param $n i32) - (table.fill $t (local.get $i) (ref.func $1) (local.get $n)) + (func (export "fill") (param $i i32) (param $r externref) (param $n i32) + (table.fill $t (local.get $i) (local.get $r) (local.get $n)) ) - (func (export "fill-2") (param $i i32) (param $n i32) - (table.fill $t (local.get $i) (ref.func $2) (local.get $n)) + (func (export "fill-abbrev") (param $i i32) (param $r externref) (param $n i32) + (table.fill (local.get $i) (local.get $r) (local.get $n)) ) - (func (export "fill-3") (param $i i32) (param $n i32) - (table.fill $t (local.get $i) (ref.func $3) (local.get $n)) + (func (export "get") (param $i i32) (result externref) + (table.get $t (local.get $i)) ) - (func (export "fill-4") (param $i i32) (param $n i32) - (table.fill $t (local.get $i) (ref.func $4) (local.get $n)) - ) + (table $t64 i64 10 externref) - (func (export "fill-null") (param $i i32) (param $n i32) - (table.fill $t (local.get $i) (ref.null func) (local.get $n)) + (func (export "fill-t64") (param $i i64) (param $r externref) (param $n i64) + (table.fill $t64 (local.get $i) (local.get $r) (local.get $n)) ) - (func (export "get-null") (param $i i32) (result funcref) - (table.get $t (local.get $i)) - ) - - (func (export "get") (param $i i32) (result i32) - (call_indirect $t (type $f) (local.get $i)) + (func (export "get-t64") (param $i i64) (result externref) + (table.get $t64 (local.get $i)) ) ) -(assert_return (invoke "get-null" (i32.const 1)) (ref.null func)) -(assert_return (invoke "get-null" (i32.const 2)) (ref.null func)) -(assert_return (invoke "get-null" (i32.const 3)) (ref.null func)) -(assert_return (invoke "get-null" (i32.const 4)) (ref.null func)) -(assert_return (invoke "get-null" (i32.const 5)) (ref.null func)) - -(assert_return (invoke "fill-1" (i32.const 2) (i32.const 3))) -(assert_return (invoke "get-null" (i32.const 1)) (ref.null func)) -(assert_return (invoke "get" (i32.const 2)) (i32.const 1)) -(assert_return (invoke "get" (i32.const 3)) (i32.const 1)) -(assert_return (invoke "get" (i32.const 4)) (i32.const 1)) -(assert_return (invoke "get-null" (i32.const 5)) (ref.null func)) - -(assert_return (invoke "fill-2" (i32.const 4) (i32.const 2))) -(assert_return (invoke "get" (i32.const 3)) (i32.const 1)) -(assert_return (invoke "get" (i32.const 4)) (i32.const 2)) -(assert_return (invoke "get" (i32.const 5)) (i32.const 2)) -(assert_return (invoke "get-null" (i32.const 6)) (ref.null func)) - -(assert_return (invoke "fill-3" (i32.const 4) (i32.const 0))) -(assert_return (invoke "get" (i32.const 3)) (i32.const 1)) -(assert_return (invoke "get" (i32.const 4)) (i32.const 2)) -(assert_return (invoke "get" (i32.const 5)) (i32.const 2)) - -(assert_return (invoke "fill-4" (i32.const 8) (i32.const 2))) -(assert_return (invoke "get-null" (i32.const 7)) (ref.null func)) -(assert_return (invoke "get" (i32.const 8)) (i32.const 4)) -(assert_return (invoke "get" (i32.const 9)) (i32.const 4)) - -(assert_return (invoke "fill-null" (i32.const 9) (i32.const 1))) -(assert_return (invoke "get" (i32.const 8)) (i32.const 4)) -(assert_return (invoke "get-null" (i32.const 9)) (ref.null func)) - -(assert_return (invoke "fill-1" (i32.const 10) (i32.const 0))) -(assert_return (invoke "get-null" (i32.const 9)) (ref.null func)) +(assert_return (invoke "get" (i32.const 1)) (ref.null extern)) +(assert_return (invoke "get" (i32.const 2)) (ref.null extern)) +(assert_return (invoke "get" (i32.const 3)) (ref.null extern)) +(assert_return (invoke "get" (i32.const 4)) (ref.null extern)) +(assert_return (invoke "get" (i32.const 5)) (ref.null extern)) + +;; (assert_return (invoke "fill" (i32.const 2) (ref.extern 1) (i32.const 3))) +(assert_return (invoke "get" (i32.const 1)) (ref.null extern)) +;; (assert_return (invoke "get" (i32.const 2)) (ref.extern 1)) +;; (assert_return (invoke "get" (i32.const 3)) (ref.extern 1)) +;; (assert_return (invoke "get" (i32.const 4)) (ref.extern 1)) +(assert_return (invoke "get" (i32.const 5)) (ref.null extern)) + +;; (assert_return (invoke "fill" (i32.const 4) (ref.extern 2) (i32.const 2))) +;; (assert_return (invoke "get" (i32.const 3)) (ref.extern 1)) +;; (assert_return (invoke "get" (i32.const 4)) (ref.extern 2)) +;; (assert_return (invoke "get" (i32.const 5)) (ref.extern 2)) +(assert_return (invoke "get" (i32.const 6)) (ref.null extern)) + +;; (assert_return (invoke "fill" (i32.const 4) (ref.extern 3) (i32.const 0))) +;; (assert_return (invoke "get" (i32.const 3)) (ref.extern 1)) +;; (assert_return (invoke "get" (i32.const 4)) (ref.extern 2)) +;; (assert_return (invoke "get" (i32.const 5)) (ref.extern 2)) + +;; (assert_return (invoke "fill" (i32.const 8) (ref.extern 4) (i32.const 2))) +(assert_return (invoke "get" (i32.const 7)) (ref.null extern)) +;; (assert_return (invoke "get" (i32.const 8)) (ref.extern 4)) +;; (assert_return (invoke "get" (i32.const 9)) (ref.extern 4)) + +(assert_return (invoke "fill-abbrev" (i32.const 9) (ref.null extern) (i32.const 1))) +;; (assert_return (invoke "get" (i32.const 8)) (ref.extern 4)) +(assert_return (invoke "get" (i32.const 9)) (ref.null extern)) + +;; (assert_return (invoke "fill" (i32.const 10) (ref.extern 5) (i32.const 0))) +(assert_return (invoke "get" (i32.const 9)) (ref.null extern)) + +;; (assert_trap +;; (invoke "fill" (i32.const 8) (ref.extern 6) (i32.const 3)) +;; "out of bounds table access" +;;) +(assert_return (invoke "get" (i32.const 7)) (ref.null extern)) +;;(assert_return (invoke "get" (i32.const 8)) (ref.extern 4)) +(assert_return (invoke "get" (i32.const 9)) (ref.null extern)) (assert_trap - (invoke "fill-2" (i32.const 8) (i32.const 3)) + (invoke "fill" (i32.const 11) (ref.null extern) (i32.const 0)) "out of bounds table access" ) -(assert_return (invoke "get-null" (i32.const 7)) (ref.null func)) -(assert_return (invoke "get" (i32.const 8)) (i32.const 4)) -(assert_return (invoke "get-null" (i32.const 9)) (ref.null func)) (assert_trap - (invoke "fill" (i32.const 11) (ref.null extern) (i32.const 0)) + (invoke "fill" (i32.const 11) (ref.null extern) (i32.const 10)) "out of bounds table access" ) +;; Same as above but for t64 + +(assert_return (invoke "get-t64" (i64.const 1)) (ref.null extern)) +(assert_return (invoke "get-t64" (i64.const 2)) (ref.null extern)) +(assert_return (invoke "get-t64" (i64.const 3)) (ref.null extern)) +(assert_return (invoke "get-t64" (i64.const 4)) (ref.null extern)) +(assert_return (invoke "get-t64" (i64.const 5)) (ref.null extern)) + +;; (assert_return (invoke "fill-t64" (i64.const 2) (ref.extern 1) (i64.const 3))) +(assert_return (invoke "get-t64" (i64.const 1)) (ref.null extern)) +;; (assert_return (invoke "get-t64" (i64.const 2)) (ref.extern 1)) +;; (assert_return (invoke "get-t64" (i64.const 3)) (ref.extern 1)) +;; (assert_return (invoke "get-t64" (i64.const 4)) (ref.extern 1)) +(assert_return (invoke "get-t64" (i64.const 5)) (ref.null extern)) + +;; (assert_return (invoke "fill-t64" (i64.const 4) (ref.extern 2) (i64.const 2))) +;; (assert_return (invoke "get-t64" (i64.const 3)) (ref.extern 1)) +;; (assert_return (invoke "get-t64" (i64.const 4)) (ref.extern 2)) +;; (assert_return (invoke "get-t64" (i64.const 5)) (ref.extern 2)) +(assert_return (invoke "get-t64" (i64.const 6)) (ref.null extern)) + +;; (assert_return (invoke "fill-t64" (i64.const 4) (ref.extern 3) (i64.const 0))) +;; (assert_return (invoke "get-t64" (i64.const 3)) (ref.extern 1)) +;; (assert_return (invoke "get-t64" (i64.const 4)) (ref.extern 2)) +;; (assert_return (invoke "get-t64" (i64.const 5)) (ref.extern 2)) + +;; (assert_return (invoke "fill-t64" (i64.const 8) (ref.extern 4) (i64.const 2))) +(assert_return (invoke "get-t64" (i64.const 7)) (ref.null extern)) +;; (assert_return (invoke "get-t64" (i64.const 8)) (ref.extern 4)) +;; (assert_return (invoke "get-t64" (i64.const 9)) (ref.extern 4)) + +(assert_return (invoke "fill-t64" (i64.const 9) (ref.null extern) (i64.const 1))) +;; (assert_return (invoke "get-t64" (i64.const 8)) (ref.extern 4)) +(assert_return (invoke "get-t64" (i64.const 9)) (ref.null extern)) + +;; (assert_return (invoke "fill-t64" (i64.const 10) (ref.extern 5) (i64.const 0))) +(assert_return (invoke "get-t64" (i64.const 9)) (ref.null extern)) + +;; (assert_trap +;; (invoke "fill-t64" (i64.const 8) (ref.extern 6) (i64.const 3)) +;; "out of bounds table access" +;; ) +(assert_return (invoke "get-t64" (i64.const 7)) (ref.null extern)) +;; (assert_return (invoke "get-t64" (i64.const 8)) (ref.extern 4)) +(assert_return (invoke "get-t64" (i64.const 9)) (ref.null extern)) + (assert_trap - (invoke "fill" (i32.const 11) (ref.null extern) (i32.const 10)) + (invoke "fill-t64" (i64.const 11) (ref.null extern) (i64.const 0)) "out of bounds table access" ) +(assert_trap + (invoke "fill-t64" (i64.const 11) (ref.null extern) (i64.const 10)) + "out of bounds table access" +) ;; Type errors |