// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: p_pip_ssf_combinable
static bool p_pip_ssf_combinable(s7_scheme *sc, opt_info *opc, int32_t start)
                {
                    opt_info *o1;
                    if ((sc->pc > 1) &&
                            (opc == sc->opts[sc->pc - 2]))
                    {
                        o1 = sc->opts[sc->pc - 1];
                        if (o1->v[0].fp == opt_p_pi_ss) /* ref for set! as in (set! (var ind) ...) for example */
                        {
                            opt_type_t ref_type, set_type;
                            ref_type = o1->types[0];
                            set_type = opc->types[0];
                            opc->v[5].p_pip_f = opc->v[3].p_pip_f;
                            opc->v[6].p_pi_f = o1->v[3].p_pi_f;
                            opc->v[3].p = o1->v[1].p;
                            opc->v[4].p = o1->v[2].p;
                            opc->v[0].fp = opt_p_pip_sso;
                            backup_pc(sc);
                            return(oo_set_type_4(opc, 7, 1, 2, 3, 4, set_type, OO_I, ref_type, OO_I));
                        }
                        if (o1->v[0].fp == opt_p_p_c)
                        {
                            opc->v[5].p_p_f = o1->v[2].p_p_f;
                            opc->v[4].p = o1->v[1].p;
                            backup_pc(sc);
                            opc->v[0].fp = opt_p_pip_c;
                            return(oo_set_type_2(opc, 6, 1, 2, OO_P, OO_I));
                        }
                    }

                    o1 = sc->opts[start];
                    if (o1->v[0].fp == opt_p_p_f)
                    {
                        opc->v[4].p_p_f = o1->v[2].p_p_f;
                        opc->v[0].fp = opt_p_pip_ssf1;
                        return(oo_set_type_2(opc, 5, 1, 2, OO_P, OO_I));
                    }
                    return(return_false(sc, NULL, __func__, __LINE__));
                }

// Assembly:
subq $0x68, %rsp
movq %rdi, 0x58(%rsp)
movq %rsi, 0x50(%rsp)
movl %edx, 0x4c(%rsp)
movq 0x58(%rsp), %rax
cmpl $0x1, 0x2258(%rax)
jle 0xf6d1b
movq 0x50(%rsp), %rax
movq 0x58(%rsp), %rcx
movq 0x58(%rsp), %rdx
movl 0x2258(%rdx), %edx
subl $0x2, %edx
movslq %edx, %rdx
cmpq 0x2260(%rcx,%rdx,8), %rax
jne 0xf6d1b
movq 0x58(%rsp), %rax
movq 0x58(%rsp), %rcx
movl 0x2258(%rcx), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x40(%rsp)
movq 0x40(%rsp), %rax
leaq 0x10d4(%rip), %rcx      # 0xf7c60
cmpq %rcx, (%rax)
jne 0xf6c7f
movq 0x40(%rsp), %rax
movl 0x70(%rax), %eax
movl %eax, 0x3c(%rsp)
movq 0x50(%rsp), %rax
movl 0x70(%rax), %eax
movl %eax, 0x38(%rsp)
movq 0x50(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x28(%rax)
movq 0x40(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x30(%rax)
movq 0x40(%rsp), %rax
movq 0x8(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x18(%rax)
movq 0x40(%rsp), %rax
movq 0x10(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x50(%rsp), %rax
leaq 0x109f(%rip), %rcx      # 0xf7ca0
movq %rcx, (%rax)
movq 0x58(%rsp), %rax
movl 0x2258(%rax), %ecx
addl $-0x1, %ecx
movl %ecx, 0x2258(%rax)
movq 0x50(%rsp), %rdi
movl 0x38(%rsp), %r11d
movl 0x3c(%rsp), %r10d
movl $0x7, %esi
movl $0x1, %edx
movl $0x2, %ecx
movl $0x3, %r8d
movl $0x4, %r9d
leaq 0xf86b8(%rip), %rax     # 0x1ef301
movl %r11d, (%rsp)
movl $0x1, 0x8(%rsp)
movl %r10d, 0x10(%rsp)
movl $0x1, 0x18(%rsp)
movq %rax, 0x20(%rsp)
movl $0xef6a, 0x28(%rsp)     # imm = 0xEF6A
callq 0xe6280
andb $0x1, %al
movb %al, 0x67(%rsp)
jmp 0xf6da4
movq 0x40(%rsp), %rax
leaq 0x10b5(%rip), %rcx      # 0xf7d40
cmpq %rcx, (%rax)
jne 0xf6d19
movq 0x40(%rsp), %rax
movq 0x10(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x28(%rax)
movq 0x40(%rsp), %rax
movq 0x8(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x58(%rsp), %rax
movl 0x2258(%rax), %ecx
addl $-0x1, %ecx
movl %ecx, 0x2258(%rax)
movq 0x50(%rsp), %rax
leaq 0x1098(%rip), %rcx      # 0xf7d70
movq %rcx, (%rax)
movq 0x50(%rsp), %rdi
movl $0x6, %esi
movl $0x1, %r9d
movl $0x2, %ecx
xorl %r8d, %r8d
leaq 0xf8607(%rip), %rax     # 0x1ef301
movl %r9d, %edx
movq %rax, (%rsp)
movl $0xef72, 0x8(%rsp)      # imm = 0xEF72
callq 0xe54b0
andb $0x1, %al
movb %al, 0x67(%rsp)
jmp 0xf6da4
jmp 0xf6d1b
movq 0x58(%rsp), %rax
movslq 0x4c(%rsp), %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x40(%rsp)
movq 0x40(%rsp), %rax
leaq 0x10c2(%rip), %rcx      # 0xf7e00
cmpq %rcx, (%rax)
jne 0xf6d9f
movq 0x40(%rsp), %rax
movq 0x10(%rax), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x50(%rsp), %rax
leaq 0x111f(%rip), %rcx      # 0xf7e80
movq %rcx, (%rax)
movq 0x50(%rsp), %rdi
movl $0x5, %esi
movl $0x1, %r9d
movl $0x2, %ecx
xorl %r8d, %r8d
leaq 0xf857e(%rip), %rax     # 0x1ef301
movl %r9d, %edx
movq %rax, (%rsp)
movl $0xef7b, 0x8(%rsp)      # imm = 0xEF7B
callq 0xe54b0
andb $0x1, %al
movb %al, 0x67(%rsp)
jmp 0xf6da4
movb $0x0, 0x67(%rsp)
movb 0x67(%rsp), %al
andb $0x1, %al
addq $0x68, %rsp
retq
nop