diff --git a/tests/beqr_d.c b/tests/beqr_d.c index 9bc6c0fda..408f0dfb0 100644 --- a/tests/beqr_d.c +++ b/tests/beqr_d.c @@ -25,6 +25,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(-1, 0) == 0); ASSERT(f(0, -1) == 0); ASSERT(f(1, 1) == 1); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/beqr_f.c b/tests/beqr_f.c index 00e1fcced..2e91105b2 100644 --- a/tests/beqr_f.c +++ b/tests/beqr_f.c @@ -25,6 +25,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(-1, 0) == 0); ASSERT(f(0, -1) == 0); ASSERT(f(1, 1) == 1); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bger_d.c b/tests/bger_d.c index 24a52dcf2..74786ad9f 100644 --- a/tests/bger_d.c +++ b/tests/bger_d.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 1); ASSERT(f(-1, 0) == 0); ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bger_f.c b/tests/bger_f.c index f068d77d6..03dde27d5 100644 --- a/tests/bger_f.c +++ b/tests/bger_f.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 1); ASSERT(f(-1, 0) == 0); ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bgtr_d.c b/tests/bgtr_d.c index 5bc69146e..f5ea7a254 100644 --- a/tests/bgtr_d.c +++ b/tests/bgtr_d.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 1); ASSERT(f(-1, 0) == 0); ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bgtr_f.c b/tests/bgtr_f.c index da271b77e..e1aec3a12 100644 --- a/tests/bgtr_f.c +++ b/tests/bgtr_f.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 1); ASSERT(f(-1, 0) == 0); ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bler_d.c b/tests/bler_d.c index 955004356..8d189a872 100644 --- a/tests/bler_d.c +++ b/tests/bler_d.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 0); ASSERT(f(-1, 0) == 1); ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bler_f.c b/tests/bler_f.c index 751f2bb77..74cc65ceb 100644 --- a/tests/bler_f.c +++ b/tests/bler_f.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 0); ASSERT(f(-1, 0) == 1); ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bltr_d.c b/tests/bltr_d.c index fd7daf2c1..9ce78b666 100644 --- a/tests/bltr_d.c +++ b/tests/bltr_d.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 0); ASSERT(f(-1, 0) == 1); ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/bltr_f.c b/tests/bltr_f.c index 20075e30d..177a5869a 100644 --- a/tests/bltr_f.c +++ b/tests/bltr_f.c @@ -24,6 +24,9 @@ run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) ASSERT(f(1, 0) == 0); ASSERT(f(-1, 0) == 1); ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 0); + ASSERT(f(0.0/0.0, 0) == 0); } int diff --git a/tests/buneqr_d.c b/tests/buneqr_d.c new file mode 100644 index 000000000..887a3ddc2 --- /dev/null +++ b/tests/buneqr_d.c @@ -0,0 +1,37 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_DOUBLE, JIT_ARG_ABI_DOUBLE }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_buneqr_d(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(double, double) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 1); + ASSERT(f(0, 1) == 0); + ASSERT(f(1, 0) == 0); + ASSERT(f(-1, 0) == 0); + ASSERT(f(0, -1) == 0); + ASSERT(f(1, 1) == 1); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/buneqr_f.c b/tests/buneqr_f.c new file mode 100644 index 000000000..0671daeb1 --- /dev/null +++ b/tests/buneqr_f.c @@ -0,0 +1,37 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_FLOAT, JIT_ARG_ABI_FLOAT }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_buneqr_f(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(float, float) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 1); + ASSERT(f(0, 1) == 0); + ASSERT(f(1, 0) == 0); + ASSERT(f(-1, 0) == 0); + ASSERT(f(0, -1) == 0); + ASSERT(f(1, 1) == 1); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bunger_d.c b/tests/bunger_d.c new file mode 100644 index 000000000..3a22336ca --- /dev/null +++ b/tests/bunger_d.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_DOUBLE, JIT_ARG_ABI_DOUBLE }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bunger_d(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(double, double) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 1); + ASSERT(f(0, 1) == 0); + ASSERT(f(1, 0) == 1); + ASSERT(f(-1, 0) == 0); + ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bunger_f.c b/tests/bunger_f.c new file mode 100644 index 000000000..a4bd7f0df --- /dev/null +++ b/tests/bunger_f.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_FLOAT, JIT_ARG_ABI_FLOAT }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bunger_f(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(float, float) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 1); + ASSERT(f(0, 1) == 0); + ASSERT(f(1, 0) == 1); + ASSERT(f(-1, 0) == 0); + ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bungtr_d.c b/tests/bungtr_d.c new file mode 100644 index 000000000..780e8d0b2 --- /dev/null +++ b/tests/bungtr_d.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_DOUBLE, JIT_ARG_ABI_DOUBLE }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bungtr_d(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(double, double) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 0); + ASSERT(f(0, 1) == 0); + ASSERT(f(1, 0) == 1); + ASSERT(f(-1, 0) == 0); + ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bungtr_f.c b/tests/bungtr_f.c new file mode 100644 index 000000000..4debed9f7 --- /dev/null +++ b/tests/bungtr_f.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_FLOAT, JIT_ARG_ABI_FLOAT }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bungtr_f(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(float, float) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 0); + ASSERT(f(0, 1) == 0); + ASSERT(f(1, 0) == 1); + ASSERT(f(-1, 0) == 0); + ASSERT(f(0, -1) == 1); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bunler_d.c b/tests/bunler_d.c new file mode 100644 index 000000000..868001eb2 --- /dev/null +++ b/tests/bunler_d.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_DOUBLE, JIT_ARG_ABI_DOUBLE }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bunler_d(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(double, double) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 1); + ASSERT(f(0, 1) == 1); + ASSERT(f(1, 0) == 0); + ASSERT(f(-1, 0) == 1); + ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bunler_f.c b/tests/bunler_f.c new file mode 100644 index 000000000..10c5d4abd --- /dev/null +++ b/tests/bunler_f.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_FLOAT, JIT_ARG_ABI_FLOAT }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bunler_f(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(float, float) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 1); + ASSERT(f(0, 1) == 1); + ASSERT(f(1, 0) == 0); + ASSERT(f(-1, 0) == 1); + ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bunltr_d.c b/tests/bunltr_d.c new file mode 100644 index 000000000..79b96a1c7 --- /dev/null +++ b/tests/bunltr_d.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_DOUBLE, JIT_ARG_ABI_DOUBLE }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bunltr_d(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(double, double) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 0); + ASSERT(f(0, 1) == 1); + ASSERT(f(1, 0) == 0); + ASSERT(f(-1, 0) == 1); + ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +} diff --git a/tests/bunltr_f.c b/tests/bunltr_f.c new file mode 100644 index 000000000..3fdd4bb15 --- /dev/null +++ b/tests/bunltr_f.c @@ -0,0 +1,36 @@ +#include "test.h" + +static void +run_test(jit_state_t *j, uint8_t *arena_base, size_t arena_size) +{ + jit_begin(j, arena_base, arena_size); + + const jit_arg_abi_t abi[] = { JIT_ARG_ABI_FLOAT, JIT_ARG_ABI_FLOAT }; + jit_arg_t args[2]; + const jit_anyreg_t regs[] = { { .fpr=JIT_F0 }, { .fpr=JIT_F1 } }; + + jit_receive(j, 2, abi, args); + jit_load_args(j, 2, abi, args, regs); + + jit_reloc_t r = jit_bunltr_f(j, JIT_F0, JIT_F1); + jit_reti(j, 0); + jit_patch_here(j, r); + jit_reti(j, 1); + + intmax_t (*f)(float, float) = jit_end(j, NULL); + + ASSERT(f(0, 0) == 0); + ASSERT(f(0, 1) == 1); + ASSERT(f(1, 0) == 0); + ASSERT(f(-1, 0) == 1); + ASSERT(f(0, -1) == 0); + + ASSERT(f(0, 0.0/0.0) == 1); + ASSERT(f(0.0/0.0, 0) == 1); +} + +int +main (int argc, char *argv[]) +{ + return main_helper(argc, argv, run_test); +}