BXHW3TLNOYVMEJZTWFCQRS3AWRMT6T74RH3Z7WTTJUMSW6PSKQCAC
int eq(int a, int b) {
return a == b;
}
int ne(int a, int b) {
return a != b;
}
int lt(int a, int b) {
return a < b;
}
int gt(int a, int b) {
return a > b;
}
int le(int a, int b) {
return a <= b;
}
int ge(int a, int b) {
return a >= b;
}
assert :erlang.apply(:"3_int_cond.opt", :ge, [1, 2]) == 2
assert :erlang.apply(:"3_int_cond.opt", :ge, [42, 41]) == 42
assert :erlang.apply(:"3_int_cond.opt", :ge_select, [1, 2]) == 2
assert :erlang.apply(:"3_int_cond.opt", :ge_select, [42, 41]) == 42
end
test "compile int_comp" do
assert {:module, :"4_int_comp.opt"} = WaEmbedder.compile("test_data/4_int_comp.opt.wasm")
assert :erlang.apply(:"4_int_comp.opt", :eq, [1, 2]) == false
assert :erlang.apply(:"4_int_comp.opt", :eq, [1, 1]) == true
assert :erlang.apply(:"4_int_comp.opt", :ne, [1, 2]) == true
assert :erlang.apply(:"4_int_comp.opt", :ne, [1, 1]) == false
assert :erlang.apply(:"4_int_comp.opt", :lt, [1, 2]) == true
assert :erlang.apply(:"4_int_comp.opt", :lt, [2, 2]) == false
assert :erlang.apply(:"4_int_comp.opt", :lt, [2, 1]) == false
assert :erlang.apply(:"4_int_comp.opt", :gt, [1, 2]) == false
assert :erlang.apply(:"4_int_comp.opt", :gt, [2, 2]) == false
assert :erlang.apply(:"4_int_comp.opt", :gt, [2, 1]) == true
assert :erlang.apply(:"4_int_comp.opt", :le, [1, 2]) == true
assert :erlang.apply(:"4_int_comp.opt", :le, [2, 2]) == true
assert :erlang.apply(:"4_int_comp.opt", :le, [2, 1]) == false
assert :erlang.apply(:"4_int_comp.opt", :ge, [1, 2]) == false
assert :erlang.apply(:"4_int_comp.opt", :ge, [2, 2]) == true
assert :erlang.apply(:"4_int_comp.opt", :gt, [2, 1]) == true
assert :erlang.apply(:"9_all.opt", :ge, [2, 1]) == 2
assert :erlang.apply(:"9_all.opt", :ge, [123, -1]) == 123
assert :erlang.apply(:"9_all.opt", :ge_select, [2, 1]) == 2
assert :erlang.apply(:"9_all.opt", :ge_select, [123, -1]) == 123
assert :erlang.apply(:"9_all.opt", :eq, [1, 2]) == false
assert :erlang.apply(:"9_all.opt", :eq, [1, 1]) == true
assert :erlang.apply(:"9_all.opt", :ne, [1, 2]) == true
assert :erlang.apply(:"9_all.opt", :ne, [1, 1]) == false
assert :erlang.apply(:"9_all.opt", :lt, [1, 2]) == true
assert :erlang.apply(:"9_all.opt", :lt, [2, 2]) == false
assert :erlang.apply(:"9_all.opt", :lt, [2, 1]) == false
assert :erlang.apply(:"9_all.opt", :gt, [1, 2]) == false
assert :erlang.apply(:"9_all.opt", :gt, [2, 2]) == false
assert :erlang.apply(:"9_all.opt", :gt, [2, 1]) == true
assert :erlang.apply(:"9_all.opt", :le, [1, 2]) == true
assert :erlang.apply(:"9_all.opt", :le, [2, 2]) == true
assert :erlang.apply(:"9_all.opt", :le, [2, 1]) == false
assert :erlang.apply(:"9_all.opt", :ge, [1, 2]) == false
assert :erlang.apply(:"9_all.opt", :ge, [2, 2]) == true
assert :erlang.apply(:"9_all.opt", :gt, [2, 1]) == true