// File: /workspace/github_c_makefile_star2_O0/Encryptr[P]O-plus-plus/opp/compiler/compile_expr.c
// Function: opp_compile_bin
static Opp_Obj opp_compile_bin(struct Opp_Context* opp, struct Opp_Node* bin)
{
	Opp_Obj lhs = opp_compile_expr(opp, bin->bin_expr.left);
	Opp_Obj rhs = opp_compile_expr(opp, bin->bin_expr.right);

	opp_type_cast(opp, &lhs, &rhs);

	if (lhs.depth > 0 && (bin->bin_expr.right->type != EUNARY || 
		bin->bin_expr.right->unary_expr.type != TINTEGER)) {
		OPCODE_START();
			OPCODE_TYPE(OPCODE_ARITH);
			opp->ir.opcodes[opp->ir.instr_idx].arith.type = TMUL;
			opp->ir.opcodes[opp->ir.instr_idx].arith.imm = true;
			opp->ir.opcodes[opp->ir.instr_idx].arith.val.type = IMM_I8;
			lhs.depth--;
			opp->ir.opcodes[opp->ir.instr_idx].arith.val.imm_i8 = opp_type_to_size(&lhs);
			lhs.depth++;
		OPCODE_END();
	}

	enum OppIr_Const_Type t = opp_type_to_ir(&lhs);

	OPCODE_START();
		OPCODE_TYPE(OPCODE_ARITH);
		opp->ir.opcodes[opp->ir.instr_idx].arith.type = bin->bin_expr.tok;
		opp->ir.opcodes[opp->ir.instr_idx].arith.imm = false;
		opp->ir.opcodes[opp->ir.instr_idx].arith.floating = 
			t == IMM_F64 || t == IMM_F32 ? 1 : 0;
		opp->ir.opcodes[opp->ir.instr_idx].arith.unsign = lhs.unsign;
	OPCODE_END();

	return lhs;
}

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x20(%rsp)
movq %rsi, 0x18(%rsp)
movq 0x20(%rsp), %rdi
movq 0x18(%rsp), %rax
movq 0x20(%rax), %rsi
callq 0x5d60
movq %rax, 0x28(%rsp)
movq %rdx, 0x30(%rsp)
movq 0x20(%rsp), %rdi
movq 0x18(%rsp), %rax
movq 0x18(%rax), %rsi
callq 0x5d60
movq %rax, 0x8(%rsp)
movq %rdx, 0x10(%rsp)
movq 0x20(%rsp), %rdi
leaq 0x28(%rsp), %rsi
leaq 0x8(%rsp), %rdx
callq 0x5820
movzwl 0x30(%rsp), %eax
cmpl $0x0, %eax
jle 0x6947
movq 0x18(%rsp), %rax
movq 0x18(%rax), %rax
cmpl $0x5, (%rax)
jne 0x687b
movq 0x18(%rsp), %rax
movq 0x18(%rax), %rax
cmpl $0x2, 0x10(%rax)
je 0x6947
movq 0x20(%rsp), %rdi
callq 0x5600
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rcx
imulq $0x28, 0x48(%rcx), %rcx
addq %rcx, %rax
movl $0x6, (%rax)
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rcx
imulq $0x28, 0x48(%rcx), %rcx
addq %rcx, %rax
movl $0x16, 0x8(%rax)
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rcx
imulq $0x28, 0x48(%rcx), %rcx
addq %rcx, %rax
movb $0x1, 0xc(%rax)
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rcx
imulq $0x28, 0x48(%rcx), %rcx
addq %rcx, %rax
movl $0x4, 0x10(%rax)
movw 0x30(%rsp), %ax
addw $-0x1, %ax
movw %ax, 0x30(%rsp)
leaq 0x28(%rsp), %rdi
callq 0x5750
movb %al, %cl
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rdx
imulq $0x28, 0x48(%rdx), %rdx
addq %rdx, %rax
movb %cl, 0x18(%rax)
movw 0x30(%rsp), %ax
addw $0x1, %ax
movw %ax, 0x30(%rsp)
movq 0x20(%rsp), %rax
movq 0x48(%rax), %rcx
addq $0x1, %rcx
movq %rcx, 0x48(%rax)
leaq 0x28(%rsp), %rdi
callq 0x5670
movl %eax, 0x4(%rsp)
movq 0x20(%rsp), %rdi
callq 0x5600
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rcx
imulq $0x28, 0x48(%rcx), %rcx
addq %rcx, %rax
movl $0x6, (%rax)
movq 0x18(%rsp), %rax
movl 0x10(%rax), %ecx
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rdx
imulq $0x28, 0x48(%rdx), %rdx
addq %rdx, %rax
movl %ecx, 0x8(%rax)
movq 0x20(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x20(%rsp), %rcx
imulq $0x28, 0x48(%rcx), %rcx
addq %rcx, %rax
movb $0x0, 0xc(%rax)
movb $0x1, %al
cmpl $0xc, 0x4(%rsp)
movb %al, 0x3(%rsp)
je 0x69cf
cmpl $0xb, 0x4(%rsp)
sete %al
movb %al, 0x3(%rsp)
movb 0x3(%rsp), %dl
movq 0x20(%rsp), %rax
movq 0x48(%rax), %rcx
movq 0x58(%rax), %rax
leaq (%rcx,%rcx,4), %rcx
andb $0x1, %dl
movb %dl, 0xd(%rax,%rcx,8)
movb 0x34(%rsp), %dl
movq 0x20(%rsp), %rax
movq 0x48(%rax), %rcx
movq 0x58(%rax), %rax
leaq (%rcx,%rcx,4), %rcx
andb $0x1, %dl
movb %dl, 0xe(%rax,%rcx,8)
movq 0x20(%rsp), %rax
movq 0x48(%rax), %rcx
incq %rcx
movq %rcx, 0x48(%rax)
movq 0x28(%rsp), %rax
movq 0x30(%rsp), %rdx
addq $0x38, %rsp
retq
nopw %cs:(%rax,%rax)