#include <ejit/ejit.h>
#include <assert.h>
#include "do_jit.h"

int main(int argc, char *argv[])
{
	(void)argv;
	bool do_jit = argc > 1;
	struct ejit_operand operands[1] = {
		EJIT_OPERAND_GPR(0, EJIT_TYPE(long))
	};

	struct ejit_func *f = ejit_create_func(EJIT_TYPE(long), 1, operands);

	ejit_comr(f, EJIT_GPR(0), EJIT_GPR(0));
	ejit_retr(f, EJIT_GPR(0));

	ejit_select_compile_func(f, 1, 0, EJIT_USE64(long), do_jit);

	assert((int32_t)erf1(f, EJIT_ARG(0, long)
	                     ) == (int32_t)0xffffffff);

	assert((int32_t)erf1(f, EJIT_ARG(1, long)
	                     ) == (int32_t)0xfffffffe);

	assert((int32_t)erf1(f, EJIT_ARG(0xffffffff, long)
	                     ) == 0);

	assert((int32_t)erf1(f, EJIT_ARG(0x80000000, long)
	                     ) == 0x7fffffff);

	assert((int32_t)erf1(f, EJIT_ARG(0x7fffffff, long)
	                     ) == (int32_t)0x80000000);

	assert((int32_t)erf1(f, EJIT_ARG(0x80000001, long)
	                     ) == (int32_t)0x7ffffffe);

	assert(erf1(f, EJIT_ARG(0, long)
	            ) == (int64_t)0xffffffffffffffff);

	assert(erf1(f, EJIT_ARG(1, long)
	            ) == (int64_t)0xfffffffffffffffe);

	assert(erf1(f, EJIT_ARG(0xffffffff, long)
	            ) == (int64_t)0xffffffff00000000);

	assert(erf1(f, EJIT_ARG(0x80000000, long)
	            ) == (int64_t)0xffffffff7fffffff);

	assert(erf1(f, EJIT_ARG(0x7fffffff, long)
	            ) == (int64_t)0xffffffff80000000);

	assert(erf1(f, EJIT_ARG(0x80000001, long)
	            ) == (int64_t)0xffffffff7ffffffe);

	assert(erf1(f, EJIT_ARG(0xffffffffffffffff, long)) == 0);
	assert(erf1(f, EJIT_ARG(0x8000000000000000, long)
	            ) == (int64_t)0x7fffffffffffffff);

	assert(erf1(f, EJIT_ARG(0x7fffffffffffffff, long)
	            ) == (int64_t)0x8000000000000000);

	assert(erf1(f, EJIT_ARG(0x8000000000000001, long)
	            ) == (int64_t)0x7ffffffffffffffe);

	ejit_destroy_func(f);
}