// File: /workspace/github_c_makefile_star2_O2/mirth-lang[P]mirth/bin/mirth1.c
// Function: mw_mirth_mirth_zaMirth_makezeprimzetagzx
static void mw_mirth_mirth_zaMirth_makezeprimzetagzx (struct mirth_mirth_zaMirth* in_zaMirth_1, STR* in_Str_2, INT in_Int_3, struct std_list_List_1 in_List_4, uint64_t in_Tag_5, struct mirth_mirth_zaMirth* *out_zaMirth_6) {
	struct mirth_mirth_zaMirth* v7;
	uint64_t v8 = mw_mirth_name_Name_Name(in_zaMirth_1, in_Str_2, &v7);
	struct mirth_mirth_zaMirth* v9;
	mw_mirth_data_Tag_namezx(v7, v8, in_Tag_5, &v9);
	struct mirth_mirth_zaMirth* v10;
	mw_mirth_data_Tag_valuezx(v9, in_Int_3, in_Tag_5, &v10);
	struct std_maybe_Maybe_1 v11 = { .tag=std_maybe_Maybe_1_None };
	struct mirth_mirth_zaMirth* v12;
	mw_mirth_data_Tag_sigzyzx(v10, v11, in_Tag_5, &v12);
	struct std_maybe_Maybe_1 v13 = { .tag=std_maybe_Maybe_1_None };
	struct mirth_mirth_zaMirth* v14;
	mw_mirth_data_Tag_doczx(v12, v13, in_Tag_5, &v14);
	incref(MK_std_list_List_1(in_List_4));
	struct std_list_List_1 v15 = { .tag=std_list_List_1_Nil };
	struct std_list_List_1 v16;
	mw_std_list_List_1_buildzx(v15, &v16);
	bool v17 = true;
	struct std_list_List_1 r18 = v16;
	struct std_list_List_1 v19 = in_List_4;
	bool v20 = v17;
	bool v21 = v17;
	while (v21) {
		struct std_list_List_1 r22 = r18;
		struct std_list_List_1 v23 = v19;
		bool v24 = v20;
		struct std_list_List_1 branch_zaLister_25;
		struct std_list_List_1 branch_List_26;
		bool branch_Bool_27;
		switch ((v23).tag) {
			case std_list_List_1_Cons: {
				struct std_list_List_1 v28;
				VAL v29 = mtp_std_list_List_1_Cons(v23, &v28);
				struct mirth_type_StackTypePart v30 = mtw_mirth_type_StackTypePart_Cons(V_mirth_type_Type(v29));
				struct std_list_List_1 v31;
				mw_std_list_zaLister_1_pushzx(MK_mirth_type_StackTypePart(v30), r22, &v31);
				bool v32 = true;
				branch_Bool_27 = v32;
				branch_List_26 = v28;
				branch_zaLister_25 = v31;
			} break;
			case std_list_List_1_Nil: {
				struct std_list_List_1 v33 = { .tag=std_list_List_1_Nil };
				bool v34 = false;
				branch_Bool_27 = v34;
				branch_List_26 = v33;
				branch_zaLister_25 = r22;
			} break;
			default: {
				do_panic(str_make("unexpected fallthrough in match\n", 32));
			}
		}
		v21 = branch_Bool_27;
		v20 = branch_Bool_27;
		v19 = branch_List_26;
		r18 = branch_zaLister_25;
	}
	decref(MK_std_list_List_1(v19));
	struct std_list_List_1 v35 = mw_std_list_zaLister_1_donezx(r18);
	struct mirth_mirth_zaMirth* v36;
	mw_mirth_data_Tag_inputszx(v14, v35, in_Tag_5, &v36);
	incref(MK_std_list_List_1(in_List_4));
	INT v37 = mw_std_list_List_1_len(in_List_4);
	struct mirth_mirth_zaMirth* v38;
	mw_mirth_data_Tag_numzetypezeinputszx(v36, v37, in_Tag_5, &v38);
	INT v39 = WRAP_I63(0LL);
	struct mirth_mirth_zaMirth* v40;
	mw_mirth_data_Tag_numzeresourcezeinputszx(v38, v39, in_Tag_5, &v40);
	struct std_list_List_1 v41 = { .tag=std_list_List_1_Nil };
	struct mirth_mirth_zaMirth* v42;
	mw_mirth_data_Tag_labelzeinputszx(v40, v41, in_Tag_5, &v42);
	struct mirth_mirth_zaMirth* v43;
	uint64_t v44 = mw_mirth_data_Tag_data(v42, in_Tag_5, &v43);
	struct mirth_mirth_zaMirth* v45;
	struct std_list_List_1 v46 = mw_mirth_data_Data_params(v43, v44, &v45);
	struct std_list_List_1 v47 = mw_std_list_List_1_zgCtx(v46);
	struct mirth_type_StackType v48 = mw_mirth_type_T0();
	struct mirth_type_StackType v49 = mw_std_list_List_1_for_1_sp102(v48, in_List_4);
	struct mirth_type_StackType v50 = mw_mirth_type_T0();
	struct mirth_mirth_zaMirth* v51;
	uint64_t v52 = mw_mirth_data_Tag_data(v45, in_Tag_5, &v51);
	struct mirth_mirth_zaMirth* v53;
	struct std_either_Either_2 v54 = mw_mirth_data_Data_fullzetype(v51, v52, &v53);
	struct mirth_type_StackType v55 = mw_mirth_type_Tzmza(v50, v54);
	struct mirth_type_ArrowType* v56 = mw_mirth_type_Tzezg(v49, v55);
	struct mirth_mirth_PropLabel v57 = mtw_mirth_mirth_PropLabel_TagType(in_Tag_5);
	struct mirth_mirth_zaMirth* v58;
	struct mirth_mirth_Prop_1* v59 = mw_mirth_mirth_PropLabel_prop2(v53, MK_std_list_List_1(v47), MK_mirth_type_ArrowType(v56), v57, &v58);
	void* v60 = field_mut(&mfld_mirth_data_Tag_ztctxzetype, in_Tag_5);
	mut_set(MK_mirth_mirth_Prop_1(v59), v60);
	struct mirth_def_Def v61 = mtw_mirth_def_Def_Tag(in_Tag_5);
	struct mirth_mirth_zaMirth* v62;
	mw_mirth_def_Def_register(v58, v61, &v62);
	*out_zaMirth_6 = v62;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x88, %rsp
movq %r9, -0x60(%rbp)
movq %r8, %r14
movq %rcx, %r12
movl %edx, -0x30(%rbp)
movabsq $0xfffffffffffc, %r13   # imm = 0xFFFFFFFFFFFC
leaq -0xa0(%rbp), %rbx
movq %rbx, %rdx
callq 0x12215
movq %rax, %r15
movq (%rbx), %rax
movq %rax, -0x38(%rbp)
leaq 0x10ee59c(%rip), %rdi   # 0x110bbf0
movq %r14, %rsi
callq 0x12f88
leaq 0xeb095(%rip), %rsi     # 0x1086f8
movq %r15, %rdi
movq %r13, %r15
movq %rax, %rdx
callq 0x1393b
leaq 0x10eec00(%rip), %rdi   # 0x110c278
movq %r14, %rsi
callq 0x12f88
leaq 0xeada2(%rip), %rsi     # 0x108429
pushq $0x1
popq %rdi
movq %rax, %rdx
callq 0x1393b
leaq 0x10ee687(%rip), %rdi   # 0x110bd20
movq %r14, %rsi
callq 0x12f88
leaq 0xeac19(%rip), %rbx     # 0x1082c1
xorl %edi, %edi
movq %rbx, %rsi
movq %rax, %rdx
callq 0x1393b
leaq 0x10eebcc(%rip), %rdi   # 0x110c288
movq %r14, %rsi
callq 0x12f88
xorl %edi, %edi
movq %rbx, %rsi
movq %rax, %rdx
callq 0x1393b
movq %r12, %rcx
andq %r13, %rcx
setne %al
movq %r12, -0x40(%rbp)
testb $0x3, %r12b
sete %dl
andb %al, %dl
movb %dl, -0x29(%rbp)
cmpb $0x1, %dl
jne 0x1d6f1
incl (%rcx)
movq %rcx, -0x58(%rbp)
xorl %edi, %edi
xorl %esi, %esi
callq 0xcd32
movl %eax, %ebx
movq %rdx, %r13
leaq -0x50(%rbp), %r12
movl -0x30(%rbp), %eax
movl %eax, %edi
movq -0x40(%rbp), %rcx
movb $0x1, %dl
movq %rcx, %rax
testb $0x1, %dl
je 0x1d773
xorl %edx, %edx
movl $0x0, %ecx
testl %edi, %edi
je 0x1d712
cmpl $0x1, %edi
jne 0x1d987
movq %rax, %rdi
movq %r12, %rsi
callq 0xce01
movq %rax, %rdi
shrq $0x30, %rdi
andq %r15, %rax
movq %rax, %rsi
callq 0x1decc
movq %rdx, %rdi
leaq 0xeb58c(%rip), %rsi     # 0x108ce1
movl %ebx, %edx
movq %r13, %rcx
leaq -0x70(%rbp), %r8
callq 0x8e35
movl -0x50(%rbp), %edi
movq -0x48(%rbp), %rcx
movl -0x70(%rbp), %ebx
movq -0x68(%rbp), %r13
jmp 0x1d710
andq %rax, %r15
sete %cl
testb $0x3, %al
setne %dl
orb %cl, %dl
jne 0x1d79a
decl (%r15)
jne 0x1d79a
shlq $0x30, %rdi
orq %rax, %rdi
leaq 0xeaae4(%rip), %rsi     # 0x108279
callq 0xce94
movl %ebx, %edi
movq %r13, %rsi
callq 0xcd32
movl %eax, %ebx
movq %rdx, %r15
leaq 0x10eeae8(%rip), %rdi   # 0x110c298
movq %r14, %rsi
callq 0x12f88
shlq $0x30, %rbx
orq %r15, %rbx
movq %rbx, %rdi
leaq 0xeaab0(%rip), %rsi     # 0x108279
movq %rax, %rdx
callq 0x1393b
cmpb $0x0, -0x29(%rbp)
je 0x1d7dd
movq -0x58(%rbp), %rax
incl (%rax)
movl -0x30(%rbp), %r13d
movl %r13d, %edi
movq -0x40(%rbp), %r12
movq %r12, %rsi
callq 0x10bca
movq %rax, %rbx
leaq 0x10eeaae(%rip), %rdi   # 0x110c2a8
movq %r14, %rsi
callq 0x12f88
leaq 0xea908(%rip), %r15     # 0x108111
movq %rbx, %rdi
movq %r15, %rsi
movq %rax, %rdx
callq 0x1393b
leaq 0x10eea9a(%rip), %rdi   # 0x110c2b8
movq %r14, %rsi
callq 0x12f88
pushq $0x1
popq %rdi
movq %r15, %rsi
movq %rax, %rdx
callq 0x1393b
leaq 0x10eea8d(%rip), %rdi   # 0x110c2c8
movq %r14, %rsi
callq 0x12f88
xorl %edi, %edi
leaq 0xeaa2d(%rip), %rsi     # 0x108279
movq %rax, %rdx
callq 0x1393b
leaq -0x70(%rbp), %rbx
movq -0x38(%rbp), %rdi
movq %r14, %rsi
movq %rbx, %rdx
callq 0x172b6
movq (%rbx), %rdi
leaq -0x98(%rbp), %r15
movq %rax, %rsi
movq %r15, %rdx
callq 0x1df20
movl %eax, %ebx
movq %rdx, -0x38(%rbp)
pushq $0x2
popq %rdi
xorl %esi, %esi
movl %r13d, %edx
movq %r12, %rcx
callq 0x1df70
movl %eax, %r12d
movq %rdx, %r13
movq (%r15), %rdi
leaq -0x90(%rbp), %r15
movq %r14, %rsi
movq %r15, %rdx
callq 0x172b6
movq (%r15), %rdi
leaq -0x88(%rbp), %r15
movq %rax, %rsi
movq %r15, %rdx
callq 0x1e03a
movq %rdx, %rcx
pushq $0x2
popq %rdi
xorl %esi, %esi
movl %eax, %edx
callq 0x1e0af
movq %rdx, %rcx
movl %r12d, %edi
movq %r13, %rsi
movl %eax, %edx
callq 0x1e896
movq %rax, %r12
movq %r14, %rdi
callq 0x1e136
movl $0x4, -0x50(%rbp)
movq %rax, -0x48(%rbp)
movq (%r15), %rdi
shlq $0x30, %rbx
orq -0x38(%rbp), %rbx
leaq 0xeb270(%rip), %r8      # 0x108b79
movups -0x50(%rbp), %xmm0
movups %xmm0, (%rsp)
leaq -0x80(%rbp), %r15
movq %rbx, %rsi
leaq 0xea95a(%rip), %rdx     # 0x108279
movq %r12, %rcx
movq %r15, %r9
callq 0x1e17f
movq %rax, %rbx
leaq 0x10ee934(%rip), %rdi   # 0x110c268
movq %r14, %rsi
callq 0x12f88
leaq 0xeae8e(%rip), %rsi     # 0x1087d1
movq %rbx, %rdi
movq %rax, %rdx
callq 0x1393b
movq %r14, %rdi
callq 0x1e207
movq (%r15), %rdi
pushq $0x6
popq %rsi
leaq -0x78(%rbp), %rbx
movq %rax, %rdx
movq %rbx, %rcx
callq 0x127fd
movq (%rbx), %rax
movq -0x60(%rbp), %rcx
movq %rax, (%rcx)
addq $0x88, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0xb6e7f(%rip), %rdi     # 0xd480d
pushq $0x20
popq %rsi
callq 0x8a21
movq %rax, %rdi
callq 0x8cc6