// File: /workspace/github_c_makefile_star2_O2/BernardTatin[P]s7sh/s7.c
// Function: d_7pid_ssf_combinable
static bool d_7pid_ssf_combinable(s7_scheme *sc, opt_info *opc)
                {
                    if ((sc->pc > 1) &&
                            (opc == sc->opts[sc->pc - 2]))
                    {
                        opt_info *o1;
                        o1 = sc->opts[sc->pc - 1];
                        if (o1->v[0].fd == opt_d_v)
                        {
                            opc->v[6].p = o1->v[1].p;
                            opc->v[3].obj = o1->v[5].obj;
                            opc->v[5].d_v_f = o1->v[3].d_v_f;
                            opc->v[0].fd = opt_d_7pid_sso;
                            backup_pc(sc);
                            return(oo_set_type_3(opc, 7, 1, 2, 6 + (3 << 4), OO_P, OO_I, OO_V));
                        }
                        if (o1->v[0].fd == opt_d_7pi_ss)
                        {
                            opc->v[3].d_7pi_f = o1->v[3].d_7pi_f;
                            opc->v[5].p = o1->v[1].p;
                            opc->v[6].p = o1->v[2].p;
                            opc->v[0].fd = opt_d_7pid_ss_ss;
                            backup_pc(sc);
                            return(oo_set_type_4(opc, 7, 1, 2, 5, 6, OO_P, OO_I, OO_P, OO_I));
                        }
                        if ((o1->v[0].fd == opt_d_dd_fso) &&
                                (opc->v[1].p == o1->v[2].p))
                        {
                            /* opc: pid_ssf: o->v[4].d_7pid_f(slot_value(o->v[1].p), integer(slot_value(o->v[2].p)), o1->v[0].fd(o1))
                             * o1: d_dd_fso: o->v[4].d_dd_f(o->v[5].d_7pi_f(slot_value(o->v[2].p), integer(slot_value(o->v[3].p))), real(slot_value(o->v[1].p))))
                             */
                            opc->v[6].d_dd_f = o1->v[4].d_dd_f;
                            opc->v[5].d_7pi_f = o1->v[5].d_7pi_f;
                            opc->v[3].p = o1->v[3].p;
                            opc->v[8].p = o1->v[1].p; /* can't use v8 since d_to_p commandeers it */
                            opc->v[0].fd = opt_d_7pid_ssfo;
                            if (((opc->v[5].d_7pi_f == float_vector_ref_unchecked) ||
                                        (opc->v[5].d_7pi_f == float_vector_ref_d_7pi)) &&
                                    ((opc->v[4].d_7pid_f == float_vector_set_unchecked) ||
                                     (opc->v[4].d_7pid_f == float_vector_set_d_7pid)))
                            {
                                opc->v[0].fd = opt_d_7pid_ssfo_fv; /* actually if either is *_d, we need to check the indices */
                                oo_set_type_4(opc, 9, 1, 2, 3, 8, OO_FV, OO_I, OO_I, OO_D);
                            }
                            else oo_set_type_4(opc, 9, 1, 2, 3, 8, OO_P, OO_I, OO_I, OO_D);
                            backup_pc(sc);
                            return(true);
                        }
                    }
                    return(return_false(sc, NULL, __func__, __LINE__));
                }

// Assembly:
movl 0x2258(%rdi), %eax
cmpl $0x2, %eax
jl 0x7e773
leal -0x2(%rax), %ecx
cmpq %rsi, 0x2260(%rdi,%rcx,8)
je 0x7e776
xorl %eax, %eax
retq
decl %eax
movq 0x2260(%rdi,%rax,8), %rcx
movq (%rcx), %rax
leaq 0x150d(%rip), %rdx      # 0x7fc97
cmpq %rdx, %rax
je 0x7e863
leaq 0x154e(%rip), %rdx      # 0x7fce8
cmpq %rdx, %rax
je 0x7e8b0
leaq 0x15b9(%rip), %rdx      # 0x7fd63
cmpq %rdx, %rax
jne 0x7e773
movq 0x8(%rsi), %rdx
xorl %eax, %eax
cmpq 0x10(%rcx), %rdx
jne 0x7e775
movq 0x20(%rcx), %rdx
movq %rdx, 0x30(%rsi)
movq 0x28(%rcx), %rdx
movq %rdx, 0x28(%rsi)
movq 0x18(%rcx), %r8
movq %r8, 0x18(%rsi)
movq 0x8(%rcx), %rcx
movq %rcx, 0x40(%rsi)
leaq 0x15c0(%rip), %rcx      # 0x7fda2
movq %rcx, (%rsi)
leaq 0x1625(%rip), %rcx      # 0x7fe11
cmpq %rcx, %rdx
setne %cl
leaq -0x16f8c(%rip), %r8     # 0x6786d
cmpq %r8, %rdx
setne %dl
testb %dl, %cl
jne 0x7e832
movq 0x20(%rsi), %rcx
leaq -0x134(%rip), %rdx      # 0x7e6da
cmpq %rdx, %rcx
setne %dl
leaq -0x16e6f(%rip), %r8     # 0x679ac
cmpq %r8, %rcx
setne %cl
testb %cl, %dl
jne 0x7e832
leaq 0x15ef(%rip), %rax      # 0x7fe1b
movq %rax, (%rsi)
pushq $0x5
popq %rax
movl %eax, 0x70(%rsi)
movabsq $0x100000001, %rax      # imm = 0x100000001
movq %rax, 0x74(%rsi)
movabsq $0x400000009, %rax      # imm = 0x400000009
movq %rax, 0x60(%rsi)
movl $0x2, 0x7c(%rsi)
decl 0x2258(%rdi)
jmp 0x7e8f1
movq 0x8(%rcx), %rax
movq %rax, 0x30(%rsi)
movq 0x28(%rcx), %rax
movq %rax, 0x18(%rsi)
movq 0x18(%rcx), %rax
movq %rax, 0x28(%rsi)
leaq 0x141f(%rip), %rax      # 0x7fca1
movq %rax, (%rsi)
decl 0x2258(%rdi)
movabsq $0x100000000, %rax      # imm = 0x100000000
movq %rax, 0x70(%rsi)
movabsq $0x300000007, %rax      # imm = 0x300000007
movq %rax, 0x60(%rsi)
movl $0x3, 0x78(%rsi)
jmp 0x7e8f1
movq 0x18(%rcx), %rax
movq %rax, 0x18(%rsi)
movq 0x8(%rcx), %rax
movq %rax, 0x28(%rsi)
movq 0x10(%rcx), %rax
movq %rax, 0x30(%rsi)
leaq 0x143a(%rip), %rax      # 0x7fd09
movq %rax, (%rsi)
decl 0x2258(%rdi)
movabsq $0x400000007, %rax      # imm = 0x400000007
movq %rax, 0x60(%rsi)
movaps 0x57673(%rip), %xmm0    # 0xd5f60
movups %xmm0, 0x70(%rsi)
movb $0x1, %al
retq