#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[2] = {
		EJIT_OPERAND_FPR(0, EJIT_TYPE(double)),
		EJIT_OPERAND_FPR(1, EJIT_TYPE(double))
	};

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

	struct ejit_reloc r = ejit_beqr_d(f, EJIT_FPR(0), EJIT_FPR(1));
	ejit_reti(f, 0);

	struct ejit_label l = ejit_label(f);
	ejit_patch(f, r, l);

	ejit_reti(f, 1);

	ejit_select_compile_func(f, 0, 2, EJIT_USE64(double), do_jit);

	assert(erfi2(f, EJIT_ARG(0, double), EJIT_ARG(0, double)) == 1);
	assert(erfi2(f, EJIT_ARG(0, double), EJIT_ARG(1, double)) == 0);
	assert(erfi2(f, EJIT_ARG(1, double), EJIT_ARG(0, double)) == 0);
	assert(erfi2(f, EJIT_ARG(-1, double), EJIT_ARG(0, double)) == 0);
	assert(erfi2(f, EJIT_ARG(0, double), EJIT_ARG(-1, double)) == 0);
	assert(erfi2(f, EJIT_ARG(1, double), EJIT_ARG(1, double)) == 1);

	assert(erfi2(f, EJIT_ARG(0, double), EJIT_ARG(0.0/0.0, double)) == 0);
	assert(erfi2(f, EJIT_ARG(0.0/0.0, double), EJIT_ARG(0, double)) == 0);

	ejit_destroy_func(f);
}