// File: /workspace/github_c_makefile_star2_O0/mirth-lang[P]mirth/bin/mirth1.c
// Function: mw_mirth_prim_Prim_ctxzetype
static struct std_list_List_1 mw_mirth_prim_Prim_ctxzetype (struct mirth_mirth_zaMirth* in_zaMirth_1, enum mirth_prim_Prim in_Prim_2, struct mirth_mirth_zaMirth* *out_zaMirth_3, struct mirth_type_ArrowType* *out_ArrowType_5) {
	void* v6 = field_mut(&mfld_mirth_prim_Prim_ztctxzetype, in_Prim_2);
	bool v7 = mut_is_set(v6);
	struct mirth_mirth_zaMirth* branch_zaMirth_8;
	enum mirth_prim_Prim branch_Prim_9;
	PTUP branch__10;
	if (v7) {
		VAL v11 = mut_get(v6);
		branch__10 = value_tup(v11);
		branch_Prim_9 = in_Prim_2;
		branch_zaMirth_8 = in_zaMirth_1;
	} else {
		struct mirth_mirth_zaMirth* v12;
		struct mirth_type_ArrowType* v13;
		struct std_list_List_1 v14 = mw_mirth_prim_Prim_computezectxzetype(in_zaMirth_1, in_Prim_2, &v12, &v13);
		PTUP r15 = PTRMK(0,tup_new(2),0);
		((TUP*)PTRPTR(r15))->size = 2;
		((TUP*)PTRPTR(r15))->cells[1] = MK_mirth_type_ArrowType(v13);
		((TUP*)PTRPTR(r15))->cells[0] = MK_std_list_List_1(v14);
		incref(MKTUP(r15));
		mut_set(MKTUP(r15), v6);
		branch__10 = r15;
		branch_Prim_9 = in_Prim_2;
		branch_zaMirth_8 = v12;
	}
	VAL v16 = ((TUP*)PTRPTR(branch__10))->cells[0];
	VAL v17 = ((TUP*)PTRPTR(branch__10))->cells[1];
	tup_decref_outer(branch__10);
	*out_ArrowType_5 = V_mirth_type_ArrowType(v17);
	*out_zaMirth_3 = branch_zaMirth_8;
	return V_std_list_List_1(v16);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x130, %rsp            # imm = 0x130
movq %rdi, -0x18(%rbp)
movl %esi, -0x1c(%rbp)
movq %rdx, -0x28(%rbp)
movq %rcx, -0x30(%rbp)
movl -0x1c(%rbp), %eax
movl %eax, %esi
leaq 0x125ffc2(%rip), %rdi   # 0x1395c28
callq 0x40d30
movq %rax, -0x38(%rbp)
movq -0x38(%rbp), %rdi
callq 0x45e40
andb $0x1, %al
movb %al, -0x39(%rbp)
testb $0x1, -0x39(%rbp)
je 0x135cb8
movq -0x38(%rbp), %rdi
callq 0x40f30
movq %rax, -0x68(%rbp)
movq %rdx, -0x60(%rbp)
movq -0x68(%rbp), %rdi
movq -0x60(%rbp), %rsi
callq 0xb770
movq %rax, -0x58(%rbp)
movl -0x1c(%rbp), %eax
movl %eax, -0x4c(%rbp)
movq -0x18(%rbp), %rax
movq %rax, -0x48(%rbp)
jmp 0x135ec6
movq -0x18(%rbp), %rdi
movl -0x1c(%rbp), %esi
leaq -0x70(%rbp), %rdx
leaq -0x78(%rbp), %rcx
callq 0x135f40
movl %eax, -0x88(%rbp)
movq %rdx, -0x80(%rbp)
movl $0x2, %edi
callq 0x1a7d0
orq $0x0, %rax
orq $0x0, %rax
movq %rax, -0x90(%rbp)
movabsq $0xfffffffffffc, %rax   # imm = 0xFFFFFFFFFFFC
andq -0x90(%rbp), %rax
movw $0x2, 0x6(%rax)
movabsq $0xfffffffffffc, %rax   # imm = 0xFFFFFFFFFFFC
andq -0x90(%rbp), %rax
movq -0x78(%rbp), %rcx
movq %rcx, -0xa0(%rbp)
leaq 0x25bedf(%rip), %rcx    # 0x391c08
orq $0x1, %rcx
movq %rcx, -0x98(%rbp)
movq -0xa0(%rbp), %rcx
movq %rcx, 0x18(%rax)
movq -0x98(%rbp), %rcx
movq %rcx, 0x20(%rax)
movabsq $0xfffffffffffc, %rax   # imm = 0xFFFFFFFFFFFC
andq -0x90(%rbp), %rax
movq %rax, -0x128(%rbp)
movl -0x88(%rbp), %edi
movq -0x80(%rbp), %rsi
callq 0x12780
movq %rax, %rcx
movq -0x128(%rbp), %rax
movq %rcx, -0xb0(%rbp)
movq %rdx, -0xa8(%rbp)
movq -0xb0(%rbp), %rcx
movq %rcx, 0x8(%rax)
movq -0xa8(%rbp), %rcx
movq %rcx, 0x10(%rax)
movq -0x90(%rbp), %rax
movq %rax, -0xc0(%rbp)
leaq 0x25b5e4(%rip), %rax    # 0x391398
orq $0x1, %rax
movq %rax, -0xb8(%rbp)
movq -0xb8(%rbp), %rax
andq $0x1, %rax
cmpq $0x0, %rax
je 0x135e74
movq -0x90(%rbp), %rax
movq %rax, -0xd0(%rbp)
leaq 0x25b5af(%rip), %rax    # 0x391398
orq $0x1, %rax
movq %rax, -0xc8(%rbp)
movabsq $0xfffffffffffc, %rax   # imm = 0xFFFFFFFFFFFC
andq -0xd0(%rbp), %rax
cmpq $0x0, %rax
je 0x135e74
movq -0x90(%rbp), %rax
movq %rax, -0xe0(%rbp)
leaq 0x25b578(%rip), %rax    # 0x391398
orq $0x1, %rax
movq %rax, -0xd8(%rbp)
movq -0xe0(%rbp), %rax
andq $0x3, %rax
cmpq $0x0, %rax
jne 0x135e74
movq -0x90(%rbp), %rax
movq %rax, -0xf0(%rbp)
leaq 0x25b547(%rip), %rax    # 0x391398
orq $0x1, %rax
movq %rax, -0xe8(%rbp)
movabsq $0xfffffffffffc, %rax   # imm = 0xFFFFFFFFFFFC
andq -0xf0(%rbp), %rax
movl (%rax), %ecx
addl $0x1, %ecx
movl %ecx, (%rax)
jmp 0x135e76
movq -0x90(%rbp), %rax
movq %rax, -0x100(%rbp)
leaq 0x25b50d(%rip), %rax    # 0x391398
orq $0x1, %rax
movq %rax, -0xf8(%rbp)
movq -0x38(%rbp), %rdx
movq -0x100(%rbp), %rdi
movq -0xf8(%rbp), %rsi
callq 0x431a0
movq -0x90(%rbp), %rax
movq %rax, -0x58(%rbp)
movl -0x1c(%rbp), %eax
movl %eax, -0x4c(%rbp)
movq -0x70(%rbp), %rax
movq %rax, -0x48(%rbp)
movq -0x58(%rbp), %rax
movabsq $0xfffffffffffc, %rcx   # imm = 0xFFFFFFFFFFFC
andq %rcx, %rax
movups 0x8(%rax), %xmm0
movaps %xmm0, -0x110(%rbp)
movq -0x58(%rbp), %rax
andq %rcx, %rax
movups 0x18(%rax), %xmm0
movaps %xmm0, -0x120(%rbp)
movq -0x58(%rbp), %rdi
callq 0xb7e0
movq -0x120(%rbp), %rcx
movq -0x30(%rbp), %rax
movq %rcx, (%rax)
movq -0x48(%rbp), %rcx
movq -0x28(%rbp), %rax
movq %rcx, (%rax)
movq -0x110(%rbp), %rdi
movq -0x108(%rbp), %rsi
callq 0x12c80
movl %eax, -0x10(%rbp)
movq %rdx, -0x8(%rbp)
movl -0x10(%rbp), %eax
movq -0x8(%rbp), %rdx
addq $0x130, %rsp            # imm = 0x130
popq %rbp
retq