aboutsummaryrefslogtreecommitdiff
path: root/tests/sqrtr_d.c
blob: f07b94fc7bf4e1b707f166324080c9c990f7432a (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
#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);
	size_t align = jit_enter_jit_abi(j, 0, 0, 0);
	jit_load_args_1(j, jit_operand_fpr (JIT_OPERAND_ABI_DOUBLE, JIT_F0));

	jit_sqrtr_d(j, JIT_F0, JIT_F0);
	jit_leave_jit_abi(j, 0, 0, align);
	jit_retr_d(j, JIT_F0);

	double (*f)(double) = jit_end(j, NULL);

	ASSERT(f(0.0) == 0.0);
	ASSERT(f(4.0) == 2.0);
	ASSERT(f(-4.0) != f(-4.0)); // nan
}

int
main (int argc, char *argv[])
{
	return main_helper(argc, argv, run_test);
}