wasmer/src/spec/tests/br_if.wast

;; Test `br_if` operator

(module
  (func $dummy)

  (func (export "type-i32")
    (block (drop (i32.ctz (br_if 0 (i32.const 0) (i32.const 1)))))
  )
  (func (export "type-i64")
    (block (drop (i64.ctz (br_if 0 (i64.const 0) (i32.const 1)))))
  )
  (func (export "type-f32")
    (block (drop (f32.neg (br_if 0 (f32.const 0) (i32.const 1)))))
  )
  (func (export "type-f64")
    (block (drop (f64.neg (br_if 0 (f64.const 0) (i32.const 1)))))
  )

  (func (export "type-i32-value") (result i32)
    (block (result i32) (i32.ctz (br_if 0 (i32.const 1) (i32.const 1))))
  )
  (func (export "type-i64-value") (result i64)
    (block (result i64) (i64.ctz (br_if 0 (i64.const 2) (i32.const 1))))
  )
  (func (export "type-f32-value") (result f32)
    (block (result f32) (f32.neg (br_if 0 (f32.const 3) (i32.const 1))))
  )
  (func (export "type-f64-value") (result f64)
    (block (result f64) (f64.neg (br_if 0 (f64.const 4) (i32.const 1))))
  )

  (func (export "as-block-first") (param i32) (result i32)
    (block (br_if 0 (get_local 0)) (return (i32.const 2))) (i32.const 3)
  )
  (func (export "as-block-mid") (param i32) (result i32)
    (block (call $dummy) (br_if 0 (get_local 0)) (return (i32.const 2)))
    (i32.const 3)
  )
  (func (export "as-block-last") (param i32)
    (block (call $dummy) (call $dummy) (br_if 0 (get_local 0)))
  )
  (func (export "as-block-first-value") (param i32) (result i32)
    (block (result i32)
      (drop (br_if 0 (i32.const 10) (get_local 0))) (return (i32.const 11))
    )
  )
  (func (export "as-block-mid-value") (param i32) (result i32)
    (block (result i32)
      (call $dummy)
      (drop (br_if 0 (i32.const 20) (get_local 0)))
      (return (i32.const 21))
    )
  )
  (func (export "as-block-last-value") (param i32) (result i32)
    (block (result i32)
      (call $dummy) (call $dummy) (br_if 0 (i32.const 11) (get_local 0))
    )
  )

  (func (export "as-loop-first") (param i32) (result i32)
    (block (loop (br_if 1 (get_local 0)) (return (i32.const 2)))) (i32.const 3)
  )
  (func (export "as-loop-mid") (param i32) (result i32)
    (block (loop (call $dummy) (br_if 1 (get_local 0)) (return (i32.const 2))))
    (i32.const 4)
  )
  (func (export "as-loop-last") (param i32)
    (loop (call $dummy) (br_if 1 (get_local 0)))
  )

  (func (export "as-br-value") (result i32)
    (block (result i32) (br 0 (br_if 0 (i32.const 1) (i32.const 2))))
  )

  (func (export "as-br_if-cond")
    (block (br_if 0 (br_if 0 (i32.const 1) (i32.const 1))))
  )
  (func (export "as-br_if-value") (result i32)
    (block (result i32)
      (drop (br_if 0 (br_if 0 (i32.const 1) (i32.const 2)) (i32.const 3)))
      (i32.const 4)
    )
  )
  (func (export "as-br_if-value-cond") (param i32) (result i32)
    (block (result i32)
      (drop (br_if 0 (i32.const 2) (br_if 0 (i32.const 1) (get_local 0))))
      (i32.const 4)
    )
  )

  (func (export "as-br_table-index")
    (block (br_table 0 0 0 (br_if 0 (i32.const 1) (i32.const 2))))
  )
  (func (export "as-br_table-value") (result i32)
    (block (result i32)
      (br_table 0 0 0 (br_if 0 (i32.const 1) (i32.const 2)) (i32.const 3)) (i32.const 4)
    )
  )
  (func (export "as-br_table-value-index") (result i32)
    (block (result i32)
      (br_table 0 0 (i32.const 2) (br_if 0 (i32.const 1) (i32.const 3))) (i32.const 4)
    )
  )
  (func (export "as-return-value") (result i64)
    (block (result i64) (return (br_if 0 (i64.const 1) (i32.const 2))))
  )

  (func (export "as-if-cond") (param i32) (result i32)
    (block (result i32)
      (if (result i32)
        (br_if 0 (i32.const 1) (get_local 0))
        (then (i32.const 2))
        (else (i32.const 3))
      )
    )
  )
  (func (export "as-if-then") (param i32 i32)
    (block
      (if (get_local 0) (then (br_if 1 (get_local 1))) (else (call $dummy)))
    )
  )
  (func (export "as-if-else") (param i32 i32)
    (block
      (if (get_local 0) (then (call $dummy)) (else (br_if 1 (get_local 1))))
    )
  )

  (func (export "as-select-first") (param i32) (result i32)
    (block (result i32)
      (select (br_if 0 (i32.const 3) (i32.const 10)) (i32.const 2) (get_local 0))
    )
  )
  (func (export "as-select-second") (param i32) (result i32)
    (block (result i32)
      (select (i32.const 1) (br_if 0 (i32.const 3) (i32.const 10)) (get_local 0))
    )
  )
  (func (export "as-select-cond") (result i32)
    (block (result i32)
      (select (i32.const 1) (i32.const 2) (br_if 0 (i32.const 3) (i32.const 10)))
    )
  )

 (func $f (param i32 i32 i32) (result i32) (i32.const -1))
  (func (export "as-call-first") (result i32)
    (block (result i32)
      (call $f
        (br_if 0 (i32.const 12) (i32.const 1)) (i32.const 2) (i32.const 3)
      )
    )
  )
  (func (export "as-call-mid") (result i32)
    (block (result i32)
      (call $f
        (i32.const 1) (br_if 0 (i32.const 13) (i32.const 1)) (i32.const 3)
      )
    )
  )
  (func (export "as-call-last") (result i32)
    (block (result i32)
      (call $f
        (i32.const 1) (i32.const 2) (br_if 0 (i32.const 14) (i32.const 1))
      )
    )
  )

  (func $func (param i32 i32 i32) (result i32) (get_local 0))
  (type $check (func (param i32 i32 i32) (result i32)))
  (table anyfunc (elem $func))
  (func (export "as-call_indirect-func") (result i32)
    (block (result i32)
      (call_indirect (type $check)
        (br_if 0 (i32.const 4) (i32.const 10))
        (i32.const 1) (i32.const 2) (i32.const 0)
      )
    )
  )

  (func (export "as-call_indirect-first") (result i32)
    (block (result i32)
      (call_indirect (type $check)
        (i32.const 1) (br_if 0 (i32.const 4) (i32.const 10)) (i32.const 2) (i32.const 0)
      )
    )
  )
  (func (export "as-call_indirect-mid") (result i32)
    (block (result i32)
      (call_indirect (type $check)
        (i32.const 1) (i32.const 2) (br_if 0 (i32.const 4) (i32.const 10)) (i32.const 0)
      )
    )
  )
  (func (export "as-call_indirect-last") (result i32)
    (block (result i32)
      (call_indirect (type $check)
        (i32.const 1) (i32.const 2) (i32.const 3) (br_if 0 (i32.const 4) (i32.const 10))
      )
    )
  )

  (func (export "as-set_local-value") (param i32) (result i32)
    (local i32)
    (block (result i32)
      (set_local 0 (br_if 0 (i32.const 17) (get_local 0)))
      (i32.const -1)
    )
  )

  (func (export "as-unary-operand") (result f64)
    (block (result f64) (f64.neg (br_if 0 (f64.const 1.0) (i32.const 1))))
  )
  (func (export "as-binary-left") (result i32)
    (block (result i32) (i32.add (br_if 0 (i32.const 1) (i32.const 1)) (i32.const 10)))
  )
  (func (export "as-binary-right") (result i32)
    (block (result i32) (i32.sub (i32.const 10) (br_if 0 (i32.const 1) (i32.const 1))))
  )

  (memory 0)
  (func (export "as-memory.grow-size") (result i32)
    (block (result i32) (memory.grow (br_if 0 (i32.const 1) (i32.const 1))))
  )

  (func (export "nested-block-value") (param i32) (result i32)
    (i32.add
      (i32.const 1)
      (block (result i32)
        (drop (i32.const 2))
        (i32.add
          (i32.const 4)
          (block (result i32)
            (drop (br_if 1 (i32.const 8) (get_local 0)))
            (i32.const 16)
          )
        )
      )
    )
  )

  (func (export "nested-br-value") (param i32) (result i32)
    (i32.add
      (i32.const 1)
      (block (result i32)
        (drop (i32.const 2))
        (br 0
          (block (result i32)
            (drop (br_if 1 (i32.const 8) (get_local 0))) (i32.const 4)
          )
        )
        (i32.const 16)
      )
    )
  )

  (func (export "nested-br_if-value") (param i32) (result i32)
    (i32.add
      (i32.const 1)
      (block (result i32)
        (drop (i32.const 2))
        (drop (br_if 0
          (block (result i32)
            (drop (br_if 1 (i32.const 8) (get_local 0))) (i32.const 4)
          )
          (i32.const 1)
        ))
        (i32.const 16)
      )
    )
  )

  (func (export "nested-br_if-value-cond") (param i32) (result i32)
    (i32.add
      (i32.const 1)
      (block (result i32)
        (drop (i32.const 2))
        (drop (br_if 0
          (i32.const 4)
          (block (result i32)
            (drop (br_if 1 (i32.const 8) (get_local 0))) (i32.const 1)
          )
        ))
        (i32.const 16)
      )
    )
  )

  (func (export "nested-br_table-value") (param i32) (result i32)
    (i32.add
      (i32.const 1)
      (block (result i32)
        (drop (i32.const 2))
        (br_table 0
          (block (result i32)
            (drop (br_if 1 (i32.const 8) (get_local 0))) (i32.const 4)
          )
          (i32.const 1)
        )
        (i32.const 16)
      )
    )
  )

  (func (export "nested-br_table-value-index") (param i32) (result i32)
    (i32.add
      (i32.const 1)
      (block (result i32)
        (drop (i32.const 2))
        (br_table 0
          (i32.const 4)
          (block (result i32)
            (drop (br_if 1 (i32.const 8) (get_local 0))) (i32.const 1)
          )
        )
        (i32.const 16)
      )
    )
  )

)

(assert_return (invoke "type-i32"))
(assert_return (invoke "type-i64"))
(assert_return (invoke "type-f32"))
(assert_return (invoke "type-f64"))

(assert_return (invoke "type-i32-value") (i32.const 1))
(assert_return (invoke "type-i64-value") (i64.const 2))
(assert_return (invoke "type-f32-value") (f32.const 3))
(assert_return (invoke "type-f64-value") (f64.const 4))

;; (assert_return (invoke "as-block-first" (i32.const 0)) (i32.const 2))
;; (assert_return (invoke "as-block-first" (i32.const 1)) (i32.const 3))
;; (assert_return (invoke "as-block-mid" (i32.const 0)) (i32.const 2))
;; (assert_return (invoke "as-block-mid" (i32.const 1)) (i32.const 3))
;; (assert_return (invoke "as-block-last" (i32.const 0)))
;; (assert_return (invoke "as-block-last" (i32.const 1)))

;; (assert_return (invoke "as-block-first-value" (i32.const 0)) (i32.const 11))
;; (assert_return (invoke "as-block-first-value" (i32.const 1)) (i32.const 10))
;; (assert_return (invoke "as-block-mid-value" (i32.const 0)) (i32.const 21))
;; (assert_return (invoke "as-block-mid-value" (i32.const 1)) (i32.const 20))
;; (assert_return (invoke "as-block-last-value" (i32.const 0)) (i32.const 11))
;; (assert_return (invoke "as-block-last-value" (i32.const 1)) (i32.const 11))

;; (assert_return (invoke "as-loop-first" (i32.const 0)) (i32.const 2))
;; (assert_return (invoke "as-loop-first" (i32.const 1)) (i32.const 3))
;; (assert_return (invoke "as-loop-mid" (i32.const 0)) (i32.const 2))
;; (assert_return (invoke "as-loop-mid" (i32.const 1)) (i32.const 4))
;; (assert_return (invoke "as-loop-last" (i32.const 0)))
;; (assert_return (invoke "as-loop-last" (i32.const 1)))

;; (assert_return (invoke "as-br-value") (i32.const 1))

;; (assert_return (invoke "as-br_if-cond"))
;; (assert_return (invoke "as-br_if-value") (i32.const 1))
;; (assert_return (invoke "as-br_if-value-cond" (i32.const 0)) (i32.const 2))
;; (assert_return (invoke "as-br_if-value-cond" (i32.const 1)) (i32.const 1))

;; (assert_return (invoke "as-br_table-index"))
;; (assert_return (invoke "as-br_table-value") (i32.const 1))
;; (assert_return (invoke "as-br_table-value-index") (i32.const 1))

;; (assert_return (invoke "as-return-value") (i64.const 1))

;; (assert_return (invoke "as-if-cond" (i32.const 0)) (i32.const 2))
;; (assert_return (invoke "as-if-cond" (i32.const 1)) (i32.const 1))
;; (assert_return (invoke "as-if-then" (i32.const 0) (i32.const 0)))
;; (assert_return (invoke "as-if-then" (i32.const 4) (i32.const 0)))
;; (assert_return (invoke "as-if-then" (i32.const 0) (i32.const 1)))
;; (assert_return (invoke "as-if-then" (i32.const 4) (i32.const 1)))
;; (assert_return (invoke "as-if-else" (i32.const 0) (i32.const 0)))
;; (assert_return (invoke "as-if-else" (i32.const 3) (i32.const 0)))
;; (assert_return (invoke "as-if-else" (i32.const 0) (i32.const 1)))
;; (assert_return (invoke "as-if-else" (i32.const 3) (i32.const 1)))

;; (assert_return (invoke "as-select-first" (i32.const 0)) (i32.const 3))
;; (assert_return (invoke "as-select-first" (i32.const 1)) (i32.const 3))
;; (assert_return (invoke "as-select-second" (i32.const 0)) (i32.const 3))
;; (assert_return (invoke "as-select-second" (i32.const 1)) (i32.const 3))
;; (assert_return (invoke "as-select-cond") (i32.const 3))

;; (assert_return (invoke "as-call-first") (i32.const 12))
;; (assert_return (invoke "as-call-mid") (i32.const 13))
;; (assert_return (invoke "as-call-last") (i32.const 14))

;; (assert_return (invoke "as-call_indirect-func") (i32.const 4))
;; (assert_return (invoke "as-call_indirect-first") (i32.const 4))
;; (assert_return (invoke "as-call_indirect-mid") (i32.const 4))
;; (assert_return (invoke "as-call_indirect-last") (i32.const 4))

;; (assert_return (invoke "as-set_local-value" (i32.const 0)) (i32.const -1))
;; (assert_return (invoke "as-set_local-value" (i32.const 1)) (i32.const 17))

;; (assert_return (invoke "as-unary-operand") (f64.const 1.0))
;; (assert_return (invoke "as-binary-left") (i32.const 1))
;; (assert_return (invoke "as-binary-right") (i32.const 1))
;; (assert_return (invoke "as-memory.grow-size") (i32.const 1))

;; (assert_return (invoke "nested-block-value" (i32.const 0)) (i32.const 21))
;; (assert_return (invoke "nested-block-value" (i32.const 1)) (i32.const 9))
;; (assert_return (invoke "nested-br-value" (i32.const 0)) (i32.const 5))
;; (assert_return (invoke "nested-br-value" (i32.const 1)) (i32.const 9))
;; (assert_return (invoke "nested-br_if-value" (i32.const 0)) (i32.const 5))
;; (assert_return (invoke "nested-br_if-value" (i32.const 1)) (i32.const 9))
;; (assert_return (invoke "nested-br_if-value-cond" (i32.const 0)) (i32.const 5))
;; (assert_return (invoke "nested-br_if-value-cond" (i32.const 1)) (i32.const 9))
;; (assert_return (invoke "nested-br_table-value" (i32.const 0)) (i32.const 5))
;; (assert_return (invoke "nested-br_table-value" (i32.const 1)) (i32.const 9))
;; (assert_return (invoke "nested-br_table-value-index" (i32.const 0)) (i32.const 5))
;; (assert_return (invoke "nested-br_table-value-index" (i32.const 1)) (i32.const 9))

(assert_invalid
  (module (func $type-false-i32 (block (i32.ctz (br_if 0 (i32.const 0))))))
  "type mismatch"
)
;; (assert_invalid
;;   (module (func $type-false-i64 (block (i64.ctz (br_if 0 (i32.const 0))))))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-false-f32 (block (f32.neg (br_if 0 (i32.const 0))))))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-false-f64 (block (f64.neg (br_if 0 (i32.const 0))))))
;;   "type mismatch"
;; )

;; (assert_invalid
;;   (module (func $type-true-i32 (block (i32.ctz (br_if 0 (i32.const 1))))))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-i64 (block (i64.ctz (br_if 0 (i64.const 1))))))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-f32 (block (f32.neg (br_if 0 (f32.const 1))))))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-f64 (block (f64.neg (br_if 0 (i64.const 1))))))
;;   "type mismatch"
;; )

;; (assert_invalid
;;   (module (func $type-false-arg-void-vs-num (result i32)
;;     (block (result i32) (br_if 0 (i32.const 0)) (i32.const 1))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-arg-void-vs-num (result i32)
;;     (block (result i32) (br_if 0 (i32.const 1)) (i32.const 1))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-false-arg-num-vs-void
;;     (block (br_if 0 (i32.const 0) (i32.const 0)))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-arg-num-vs-void
;;     (block (br_if 0 (i32.const 0) (i32.const 1)))
;;   ))
;;   "type mismatch"
;; )

;; (assert_invalid
;;   (module (func $type-false-arg-void-vs-num (result i32)
;;     (block (result i32) (br_if 0 (nop) (i32.const 0)) (i32.const 1))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-arg-void-vs-num (result i32)
;;     (block (result i32) (br_if 0 (nop) (i32.const 1)) (i32.const 1))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-false-arg-num-vs-num (result i32)
;;     (block (result i32)
;;       (drop (br_if 0 (i64.const 1) (i32.const 0))) (i32.const 1)
;;     )
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-true-arg-num-vs-num (result i32)
;;     (block (result i32)
;;       (drop (br_if 0 (i64.const 1) (i32.const 0))) (i32.const 1)
;;     )
;;   ))
;;   "type mismatch"
;; )

;; (assert_invalid
;;   (module (func $type-cond-void-vs-i32
;;     (block (br_if 0 (nop)))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-cond-num-vs-i32
;;     (block (br_if 0 (i64.const 0)))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-arg-cond-void-vs-i32 (result i32)
;;     (block (result i32) (br_if 0 (i32.const 0) (nop)) (i32.const 1))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-arg-void-vs-num-nested (result i32)
;;     (block (result i32) (i32.const 0) (block (br_if 1 (i32.const 1))))
;;   ))
;;   "type mismatch"
;; )
;; (assert_invalid
;;   (module (func $type-arg-cond-num-vs-i32 (result i32)
;;     (block (result i32) (br_if 0 (i32.const 0) (i64.const 0)) (i32.const 1))
;;   ))
;;   "type mismatch"
;; )

;; (assert_invalid
;;   (module (func $unbound-label (br_if 1 (i32.const 1))))
;;   "unknown label"
;; )
;; (assert_invalid
;;   (module (func $unbound-nested-label (block (block (br_if 5 (i32.const 1))))))
;;   "unknown label"
;; )
;; (assert_invalid
;;   (module (func $large-label (br_if 0x10000001 (i32.const 1))))
;;   "unknown label"
;; )