// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: dox_ex
static goto_t dox_ex(s7_scheme *sc)
                {
                    /* any number of steppers using dox exprs, end also dox, body and end result arbitrary.
                     *    since all these exprs are local, we don't need to jump until the body
                     */
                    int64_t id, steppers = 0;
                    s7_pointer frame, vars, slot, code, end, endp, stepper = NULL, form;
                    s7_function endf;

                    form = sc->code;
                    set_current_code(sc, sc->code);
                    sc->code = cdr(sc->code);

                    new_frame(sc, sc->envir, frame);   /* new frame is not tied into the symbol lookup process yet */
                    sc->temp10 = frame;
                    for (vars = car(sc->code); is_pair(vars); vars = cdr(vars))
                    {
                        s7_pointer expr, val, stp;
                        expr = cdar(vars);
                        val = fx_call(sc, expr);
                        new_cell_no_check(sc, slot, T_SLOT);
                        slot_set_symbol(slot, caar(vars));
                        slot_set_value(slot, val);
                        stp = cdr(expr); /* cddar(vars) */
                        if (is_pair(stp))
                        {
                            steppers++;
                            stepper = slot;
                            slot_set_expression(slot, stp);
                        }
                        else slot_just_set_expression(slot, sc->nil);
                        slot_set_next(slot, let_slots(frame));
                        let_set_slots(frame, slot);
                    }
                    sc->envir = frame;
                    sc->temp10 = sc->nil;
                    id = let_id(frame);
                    /* the c_calls above could have redefined a previous stepper, so that its symbol_id is > frame let_id when we get here,
                     *   so we use symbol_set_local_unchecked below to sidestep the debugger (see zauto.scm: i is a stepper, but then mock-vector-ref uses i as its index)
                     */
                    for (slot = let_slots(frame); tis_slot(slot); slot = next_slot(slot))
                        symbol_set_local_unchecked(slot_symbol(slot), id, slot);

                    end = cadr(sc->code);
                    endp = car(end);
                    endf = c_callee(end);
                    if (is_true(sc, sc->value = endf(sc, endp)))
                    {
                        sc->code = cdr(end);
                        return(goto_do_end_clauses);
                    }

                    code = cddr(sc->code);
                    if (is_null(code)) /* no body? */
                    {
                        if (endf == fx_c_d)
                        {
                            endf = c_callee(endp);
                            endp = cdr(endp);
                        }
                        if (steppers == 1)
                        {
                            s7_function f;
                            s7_pointer a;

                            f = c_callee(slot_expression(stepper)); /* e.g. fx_add_s1 */
                            a = car(slot_expression(stepper));
                            if (f == fx_c_d)
                            {
                                f = c_callee(a);
                                a = cdr(a);
                            }
                            if ((f == fx_cdr_s) &&
                                    (cadr(a) == slot_symbol(stepper)))
                            {
                                while (true)
                                {
                                    slot_set_value(stepper, cdr(slot_value(stepper)));
                                    if (endf(sc, endp) != sc->F)
                                    {
                                        sc->value = sc->T;
                                        sc->code = cdr(end);
                                        return(goto_do_end_clauses);
                                    }
                                }
                            }
                            while (true)
                            {
                                slot_set_value(stepper, f(sc, a));
                                if (is_true(sc, sc->value = endf(sc, endp)))
                                {
                                    sc->code = cdr(end);
                                    return(goto_do_end_clauses);
                                }
                            }
                        }
                        else
                        {
                            s7_pointer slots;
                            slots = let_slots(sc->envir);

                            if ((steppers == 2) &&
                                    (!tis_slot(next_slot(next_slot(slots)))))
                            {
                                s7_pointer step1, step2, expr1, expr2;
                                step1 = slots;
                                expr1 = slot_expression(step1);
                                step2 = next_slot(step1);
                                expr2 = slot_expression(step2); /* presetting c_call/car(expr) is not faster */
#if (!WITH_GMP)
                                if ((c_callee(expr2) == fx_subtract_u1) &&
                                        (is_t_integer(slot_value(step2))) &&
                                        (endf == fx_num_eq_ui))
                                {
                                    s7_int i, lim;
                                    lim = integer(caddr(endp));
                                    for (i = integer(slot_value(step2)) - 1; i >= lim; i--)
                                        slot_set_value(step1, fx_call(sc, expr1));
                                }
                                else
#endif
                                {
                                    while (true)
                                    {
                                        slot_set_value(step1, fx_call(sc, expr1));
                                        slot_set_value(step2, fx_call(sc, expr2));
                                        if (is_true(sc, sc->value = endf(sc, endp))) break;
                                    }
                                }
                                sc->code = cdr(end);
                                if (is_symbol(car(sc->code)))
                                {
                                    step1 = symbol_to_slot(sc, car(sc->code));
                                    sc->value = slot_value(step1);
                                    if (is_t_real(sc->value))
                                        clear_mutable_number(sc->value);
                                    return(goto_start);
                                }
                                return(goto_do_end_clauses);
                            }

                            while (true)
                            {
                                s7_pointer slt;
                                for (slt = slots; tis_slot(slt); slt = next_slot(slt))
                                    if (slot_has_expression(slt))
                                        slot_set_value(slt, fx_call(sc, slot_expression(slt)));
                                if (is_true(sc, sc->value = endf(sc, endp)))
                                {
                                    sc->code = cdr(end);
                                    return(goto_do_end_clauses);
                                }
                            }
                        }
                    }
                    else /* there is a body */
                    {
                        s7_pointer slots;
                        slots = let_slots(sc->envir);
                        /* is let activated? also multiexpr body  and other fx? */

                        if ((is_null(cdr(code))) &&
                                (is_pair(car(code))))
                        {
                            s7_pointer body;
                            s7_function bodyf = NULL;
                            body = car(code);

                            if ((!no_cell_opt(code)) &&
                                    (has_safe_steppers(sc, sc->envir)))
                                bodyf = s7_optimize_nr(sc, code);

                            if ((!bodyf) &&
                                    (is_fxable(sc, body)))
                                bodyf = fx_choose(sc, code, sc->envir, let_symbol_is_safe);

                            if (bodyf)
                            {
                                if (steppers == 1)                                /* one expr body, 1 stepper */
                                {
                                    s7_pointer stepa;
                                    s7_function stepf;
                                    stepf = c_callee(slot_expression(stepper));
                                    stepa = car(slot_expression(stepper));

                                    if (bodyf == opt_float_any_nr)
                                    {
                                        s7_double (*fd)(opt_info *o);
                                        opt_info *o;
                                        o = sc->opts[0];
                                        fd = o->v[0].fd;
                                        while (true)
                                        {
                                            sc->pc = 0;
                                            fd(o);
                                            slot_set_value(stepper, stepf(sc, stepa));
                                            if (is_true(sc, sc->value = endf(sc, endp)))
                                            {
                                                sc->code = cdr(end);
                                                return(goto_do_end_clauses);
                                            }
                                        }
                                    }
                                    while (true)
                                    {
                                        bodyf(sc, body);
                                        slot_set_value(stepper, stepf(sc, stepa));
                                        if (is_true(sc, sc->value = endf(sc, endp)))
                                        {
                                            sc->code = cdr(end);
                                            return(goto_do_end_clauses);
                                        }
                                    }
                                }

                                if ((steppers == 2) &&
                                        (!tis_slot(next_slot(next_slot(slots)))))
                                {
                                    s7_pointer s1, s2, p1, p2;
                                    s7_function f1, f2;
                                    s1 = slots;
                                    s2 = next_slot(slots);
                                    f1 = c_callee(slot_expression(s1));
                                    f2 = c_callee(slot_expression(s2));
                                    p1 = car(slot_expression(s1));
                                    p2 = car(slot_expression(s2));
                                    /* split out opt_float_any_nr gained nothing (see tmp) */
                                    while (true)
                                    {
                                        bodyf(sc, body);
                                        slot_set_value(s1, f1(sc, p1));
                                        slot_set_value(s2, f2(sc, p2));
                                        if (is_true(sc, sc->value = endf(sc, endp)))
                                        {
                                            sc->code = cdr(end);
                                            return(goto_do_end_clauses);
                                        }
                                    }
                                }
                                while (true)
                                {
                                    s7_pointer slot1;
                                    bodyf(sc, body);
                                    for (slot1 = slots; tis_slot(slot1); slot1 = next_slot(slot1))
                                        if (slot_has_expression(slot1))
                                            slot_set_value(slot1, fx_call(sc, slot_expression(slot1)));
                                    if (is_true(sc, sc->value = endf(sc, endp)))
                                    {
                                        sc->code = cdr(end);
                                        return(goto_do_end_clauses);
                                    }
                                }
                            }
                            if ((steppers == 1) &&
                                    (car(body) == sc->set_symbol) &&
                                    (is_pair(cdr(body))) &&
                                    (is_symbol(cadr(body))) &&
                                    (is_pair(cddr(body))) &&
                                    ((has_fx(cddr(body))) || (is_fxable(sc, caddr(body)))) &&
                                    (is_null(cdddr(body))))
                            {
                                s7_pointer val, slot, stepa;
                                s7_function stepf, valf;

                                val = cddr(body);
                                if (!has_fx(val))
                                    set_c_call(val, fx_choose(sc, val, sc->envir, let_symbol_is_safe));
                                valf = c_callee(val);
                                val = car(val);
                                slot = symbol_to_slot(sc, cadr(body));
                                if (slot == sc->undefined)
                                    eval_error_no_return(sc, sc->unbound_variable_symbol, "~A: unbound variable", 20, cadr(body));
                                stepf = c_callee(slot_expression(stepper));
                                stepa = car(slot_expression(stepper));
                                while (true)
                                {
                                    slot_set_value(slot, valf(sc, val));
                                    slot_set_value(stepper, stepf(sc, stepa));
                                    if (is_true(sc, sc->value = endf(sc, endp)))
                                    {
                                        sc->code = cdr(end);
                                        return(goto_do_end_clauses);
                                    }
                                }
                            }
                        }
                        else /* more than one expr */
                        {
                            s7_pointer p;
                            bool use_opts = false;
                            int32_t body_len = 0;
                            p = code;

                            if ((!no_cell_opt(code)) &&
                                    (has_safe_steppers(sc, sc->envir)))
                            {
                                if (setjmp(sc->opt_exit) == 0)
                                {
                                    sc->pc = 0;
                                    for (; is_pair(p); p = cdr(p), body_len++)
                                    {
                                        opt_info *start;
                                        start = sc->opts[sc->pc];
                                        if (!cell_optimize(sc, p))
                                        {
                                            set_no_cell_opt(code);
                                            p = code;
                                            break;
                                        }
                                        oo_idp_nr_fixup(start);
                                    }
                                    use_opts = is_null(p);
                                }
                            }

                            if (p == code)
                            {
                                for (; is_pair(p); p = cdr(p))
                                    if (!is_fxable(sc, car(p)))
                                        break;
                            }

                            if (is_null(p))
                            {
                                int32_t i;
                                s7_pointer stepa;
                                s7_function stepf;
                                if (!use_opts)
                                    annotate_args(sc, code, sc->envir);

                                if (stepper)
                                {
                                    stepf = c_callee(slot_expression(stepper));
                                    stepa = car(slot_expression(stepper));
                                }

                                while (true)
                                {
                                    if (use_opts)
                                    {
                                        sc->pc = 0;
                                        for (i = 0; i < body_len; i++)
                                        {
                                            opt_info *o;
                                            o = sc->opts[sc->pc];
                                            o->v[0].fp(o);
                                            sc->pc++;
                                        }
                                    }
                                    else
                                    {
                                        for (p = code; is_pair(p); p = cdr(p))
                                            fx_call(sc, p);
                                    }

                                    if (steppers == 1)
                                        slot_set_value(stepper, stepf(sc, stepa));
                                    else
                                    {
                                        s7_pointer slot;
                                        for (slot = slots; tis_slot(slot); slot = next_slot(slot))
                                            if (slot_has_expression(slot))
                                                slot_set_value(slot, fx_call(sc, slot_expression(slot)));
                                    }
                                    if (is_true(sc, sc->value = endf(sc, endp)))
                                    {
                                        sc->code = cdr(end);
                                        return(goto_do_end_clauses);
                                    }}}}}

                    if ((is_null(cdr(code))) && /* one expr */
                            (is_pair(car(code))))
                    {
                        code = car(code);
                        if ((is_syntactic_pair(code)) ||
                                (is_syntactic_symbol(car(code))))
                        {
                            push_stack_no_args(sc, OP_DOX_STEP_P, sc->code);

                            if (is_syntactic_pair(code))
                                sc->cur_op = (opcode_t)optimize_op(code);
                            else
                            {
                                sc->cur_op = (opcode_t)symbol_syntax_op_checked(code);
                                pair_set_syntax_op(code, sc->cur_op);
                            }
                            sc->code = code;
                            return(goto_top_no_pop);
                        }
                    }

                    pair_set_syntax_op(form, OP_DOX_INIT);
                    sc->code = T_Pair(cddr(sc->code));
                    push_stack_no_args(sc, (intptr_t)((is_null(cdr(sc->code))) ? OP_DOX_STEP_P : OP_DOX_STEP), cdr(form));

                    return(goto_begin);
                }

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xb8, %rsp
movq %rdi, %rbx
movq (%rdi), %rcx
movq 0x90(%rdi), %rax
movq %rcx, 0x28(%rdi)
movq %rcx, 0xa8(%rsp)
movq 0x10(%rcx), %rcx
movq %rcx, (%rdi)
cmpq 0x98(%rdi), %rax
ja 0xceba5
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %r14
movq $0x20001c, (%r14)       # imm = 0x20001C
movq 0x250(%rbx), %rax
incq %rax
movq %rax, 0x250(%rbx)
movq %rax, 0x18(%r14)
movq $0x0, 0x8(%r14)
movq 0x8(%rbx), %rax
movq %rax, 0x10(%r14)
movq %r14, 0x540(%rbx)
movq (%rbx), %rax
movq 0x8(%rax), %rax
xorl %ecx, %ecx
movl %ecx, %edx
movq %rdx, %rcx
cmpb $0x1, (%rax)
jne 0xcec96
xorl %ecx, %ecx
movq %rcx, %r13
movq %rax, %r15
movq %rcx, %r12
movq 0x8(%r15), %rax
movq 0x10(%rax), %rbp
movq 0x8(%rbp), %rsi
movq %rbx, %rdi
callq *0x20(%rbp)
movq 0x90(%rbx), %rcx
leaq -0x8(%rcx), %rdx
movq %rdx, 0x90(%rbx)
movq -0x8(%rcx), %rcx
movq $0x20, (%rcx)
movq 0x8(%r15), %rdx
movq 0x8(%rdx), %rdx
movq %rdx, 0x8(%rcx)
movq %rax, 0x10(%rcx)
movq 0x10(%rbp), %rax
cmpb $0x1, (%rax)
jne 0xcec6b
incq %r12
movq %rax, 0x28(%rcx)
movq $0x2000020, (%rcx)      # imm = 0x2000020
movq %rcx, %r13
jmp 0xcec76
movq 0x110(%rbx), %rax
movq %rax, 0x28(%rcx)
movq 0x8(%r14), %rax
movq %rax, 0x18(%rcx)
movq %rcx, 0x8(%r14)
movq 0x10(%r15), %r15
cmpb $0x1, (%r15)
movq %r12, %rcx
movq %r13, %rdx
je 0xcec10
movq %rcx, %r15
movq %rdx, %r13
movq %r14, 0x8(%rbx)
movq 0x110(%rbx), %rax
movq %rax, 0x540(%rbx)
movq 0x8(%r14), %rcx
testq %rcx, %rcx
je 0xcecde
movq 0x18(%r14), %rax
movq 0x8(%rcx), %rdx
movq %rcx, 0x18(%rdx)
movq 0x8(%rcx), %rdx
movq %rax, 0x20(%rdx)
movq 0x8(%rcx), %rdx
incl 0x28(%rdx)
movq 0x18(%rcx), %rdx
movq %rdx, %rcx
testq %rdx, %rdx
jne 0xcecbb
movq (%rbx), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %r14
movq 0x8(%r14), %rbp
movq 0x20(%r14), %r12
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xced10
movq 0x10(%r14), %rax
jmp 0xcf196
movq (%rbx), %rcx
movq 0x110(%rbx), %rax
movq 0x10(%rcx), %rcx
movq 0x10(%rcx), %rdx
cmpq %rax, %rdx
movq %r14, 0x18(%rsp)
je 0xcef2d
movq 0x8(%rbx), %rsi
movq 0x8(%rsi), %rcx
movq %rcx, 0x20(%rsp)
cmpq %rax, 0x10(%rdx)
movq %rdx, 0x10(%rsp)
jne 0xced88
movq 0x8(%rdx), %r8
cmpb $0x1, (%r8)
jne 0xced88
testb $0x4, 0x3(%rdx)
movq %r8, 0x8(%rsp)
jne 0xcf1db
movq %rbx, %rdi
callq 0xe0d3a
testb %al, %al
je 0xcf27a
movq %rbx, %rdi
movq 0x10(%rsp), %rsi
movl $0x1, %edx
callq 0x48508
jmp 0xcf27c
movq %rbp, 0xb0(%rsp)
xorl %eax, %eax
movl %eax, %ebp
movl %eax, %r14d
testb $0x4, 0x3(%rdx)
movq %rdx, %rcx
movq %r15, 0xa0(%rsp)
jne 0xcee82
movq %rbx, %rdi
callq 0xe0d3a
movq 0x10(%rsp), %rdx
xorl %ecx, %ecx
movl %ecx, %ebp
movl %ecx, %r14d
movq %rdx, %rcx
testb %al, %al
je 0xcee82
leaq 0x2190(%rbx), %rdi
callq 0x9350
movq 0x10(%rsp), %rdx
xorl %ecx, %ecx
movl %ecx, %ebp
movl %ecx, %r14d
movq %rdx, %rcx
testl %eax, %eax
jne 0xcee82
movq %r12, %r15
movl $0x0, 0x2258(%rbx)
xorl %r14d, %r14d
cmpb $0x1, (%rdx)
movq %rdx, %rax
jne 0xcee6e
xorl %ecx, %ecx
movq %rdx, %r12
movl %ecx, %r14d
movslq 0x2258(%rbx), %rax
movq 0x2260(%rbx,%rax,8), %rax
movq %rax, 0x38(%rsp)
movq %rbx, %rdi
movq %r12, %rsi
callq 0xa8bbb
movl %eax, %ebp
testb %al, %al
je 0xcee47
movq 0x38(%rsp), %rdi
callq 0xb080a
movq %r12, %rax
movq 0x10(%rsp), %rdx
jmp 0xcee53
movq 0x10(%rsp), %rdx
orb $0x4, 0x3(%rdx)
movq %rdx, %rax
testb %bpl, %bpl
je 0xcee6e
movq 0x10(%rax), %r12
movl %r14d, %ecx
incl %ecx
cmpb $0x1, (%r12)
movl %ecx, %r14d
movq %r12, %rax
je 0xcee0b
movl %r14d, %ebp
cmpq 0x110(%rbx), %rax
sete %r14b
movq %rax, %rcx
movq %r15, %r12
movq %r12, %r15
cmpq %rdx, %rcx
jne 0xceeb1
cmpb $0x1, (%rcx)
jne 0xceeb1
movq %rcx, %r12
movq 0x8(%rcx), %rsi
movq %rbx, %rdi
callq 0xd5a05
testb %al, %al
je 0xceeb4
movq 0x10(%r12), %rcx
cmpb $0x1, (%rcx)
movq %rcx, %r12
je 0xcee8f
jmp 0xceeb4
movq %rcx, %r12
cmpq 0x110(%rbx), %r12
je 0xcefb1
movq 0x10(%rsp), %rcx
movq 0x10(%rcx), %rax
cmpq 0x110(%rbx), %rax
jne 0xcef45
movq 0x8(%rcx), %rax
cmpb $0x1, (%rax)
jne 0xcef45
cmpw $0x201, (%rax)          # imm = 0x201
je 0xceeee
movq 0x8(%rax), %rcx
cmpw $0x20a, (%rcx)          # imm = 0x20A
jne 0xcef45
movq (%rbx), %rcx
movq 0x50(%rbx), %rdx
movq %rcx, (%rdx)
movq 0x8(%rbx), %rcx
movq 0x50(%rbx), %rdx
movq %rcx, 0x8(%rdx)
movq 0x50(%rbx), %rcx
movq $0x2f4, 0x18(%rcx)      # imm = 0x2F4
addq $0x20, 0x50(%rbx)
cmpw $0x201, (%rax)          # imm = 0x201
jne 0xcf2b5
movzwl 0x4(%rax), %ecx
movq %rcx, 0x18(%rbx)
jmp 0xcf2d2
leaq -0x16a76(%rip), %rax    # 0xb84be
cmpq %rax, %r12
je 0xcefe6
movq %rbp, %r14
jmp 0xcefee
movq 0xa8(%rsp), %rdx
movw $0x2f7, 0x4(%rdx)       # imm = 0x2F7
movw $0x201, (%rdx)          # imm = 0x201
movq (%rbx), %rax
movq 0x50(%rbx), %rcx
movq 0x10(%rax), %rax
movq 0x10(%rax), %rax
movq %rax, (%rbx)
movq 0x10(%rdx), %rax
movq %rax, (%rcx)
movq 0x8(%rbx), %rax
movq 0x50(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq (%rbx), %rax
movq 0x50(%rbx), %rcx
movq 0x10(%rax), %rax
xorl %edx, %edx
cmpq 0x110(%rbx), %rax
sete %al
movb %al, %dl
movl %edx, %eax
addq $0x2f3, %rax            # imm = 0x2F3
movq %rax, 0x18(%rcx)
addq $0x20, 0x50(%rbx)
movl $0x1, %eax
jmp 0xcf19e
testb %r14b, %r14b
jne 0xcefc7
movq 0x8(%rbx), %rdx
movq %rbx, %rdi
movq 0x10(%rsp), %rsi
callq 0xd9cf3
testq %r13, %r13
movq %r13, 0x28(%rsp)
je 0xcf07f
movq 0x28(%r13), %rax
movq 0x8(%rax), %r12
movq 0x20(%rax), %rax
jmp 0xcf07f
movq 0x10(%rbp), %r14
movq 0x20(%rbp), %r12
cmpq $0x1, %r15
jne 0xcf017
movq %r13, %rbp
movq 0x28(%r13), %rdx
movq 0x8(%rdx), %rcx
movq 0x20(%rdx), %rdx
cmpq %rax, %rdx
je 0xcf148
movq %rcx, %r15
movq %rdx, %r13
jmp 0xcf150
movq 0x8(%rbx), %rax
movq %r15, %rcx
movq 0x8(%rax), %r15
cmpq $0x2, %rcx
jne 0xcf037
movq 0x18(%r15), %rdx
cmpq $0x0, 0x18(%rdx)
je 0xcf1e2
testq %r15, %r15
je 0xcf064
movq %r15, %r13
testb $0x2, 0x3(%r13)
je 0xcf058
movq 0x28(%r13), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, 0x10(%r13)
movq 0x18(%r13), %rax
movq %rax, %r13
testq %rax, %rax
jne 0xcf03f
movq %rbx, %rdi
movq %r14, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf037
jmp 0xcf18d
movq %rax, 0x98(%rsp)
testb %r14b, %r14b
je 0xcf0ff
movl $0x0, 0x2258(%rbx)
testl %ebp, %ebp
je 0xcf0be
movl %ebp, %eax
movl %eax, %r13d
movslq 0x2258(%rbx), %rax
movq 0x2260(%rbx,%rax,8), %rdi
callq *(%rdi)
incl 0x2258(%rbx)
decl %r13d
movl %r13d, %eax
jne 0xcf09c
cmpq $0x1, 0xa0(%rsp)
jne 0xcf11c
movq %rbx, %rdi
movq %r12, %rsi
callq *0x98(%rsp)
movq 0x28(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq 0xb0(%rsp), %rsi
callq *%r15
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf087
jmp 0xcf18d
movq 0x10(%rsp), %rax
cmpb $0x1, (%rax)
jne 0xcf0be
movq %rax, %r13
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq 0x10(%r13), %rax
jmp 0xcf104
movq 0x20(%rsp), %rax
movq %rax, %r13
testq %rax, %rax
je 0xcf0df
testb $0x2, 0x3(%r13)
je 0xcf142
movq 0x28(%r13), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, 0x10(%r13)
movq 0x18(%r13), %rax
jmp 0xcf121
movq 0x10(%rcx), %r15
movq 0x20(%rcx), %r13
leaq -0x16ae4(%rip), %rax    # 0xb8673
cmpq %rax, %r13
jne 0xcf16a
movq 0x10(%r15), %rax
movq 0x8(%rax), %rax
cmpq 0x8(%rbp), %rax
je 0xcf1b0
movq %rbx, %rdi
movq %r15, %rsi
callq *%r13
movq %rax, 0x10(%rbp)
movq %rbx, %rdi
movq %r14, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf16a
movq 0x18(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, (%rbx)
movl $0x3, %eax
addq $0xb8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq 0x10(%rbp), %rax
movq 0x10(%rax), %rax
movq %rax, 0x10(%rbp)
movq %rbx, %rdi
movq %r14, %rsi
callq *%r12
cmpq 0x120(%rbx), %rax
je 0xcf1b0
movq 0x118(%rbx), %rax
movq %rax, 0x20(%rbx)
jmp 0xcf18d
xorl %eax, %eax
jmp 0xcf281
movq 0x28(%r15), %r13
movq 0x28(%rdx), %rbp
leaq 0x937a(%rip), %rax      # 0xd856b
cmpq %rax, 0x20(%rbp)
je 0xcf58c
movq %rdx, 0x60(%rsp)
movq 0x8(%r13), %rsi
movq %rbx, %rdi
callq *0x20(%r13)
movq %rax, 0x10(%r15)
movq 0x8(%rbp), %rsi
movq %rbx, %rdi
callq *0x20(%rbp)
movq 0x60(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq %r14, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf200
movq 0x18(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, (%rbx)
movq 0x8(%rax), %rsi
movl $0x3, %eax
cmpb $0xa, (%rsi)
jne 0xcf19e
movq %rbx, %rdi
callq 0xccb2
movq 0x10(%rax), %rcx
movq %rcx, 0x20(%rbx)
xorl %eax, %eax
cmpb $0xd, (%rcx)
jne 0xcf19e
andb $-0x5, 0x3(%rcx)
jmp 0xcf19e
xorl %eax, %eax
movq 0x8(%rsp), %r8
movq %rax, %r14
testq %rax, %rax
jne 0xcf2e9
movq %rbx, %rdi
movq %r8, %rsi
callq 0xd5a05
testb %al, %al
je 0xcf2df
movq 0x8(%rbx), %rdx
leaq -0x1711b(%rip), %rcx    # 0xb8188
movq %rbx, %rdi
movq 0x10(%rsp), %rsi
callq 0xb69b9
movq %rax, %r14
jmp 0xcf2e4
movq 0x8(%rax), %rcx
movq 0x10(%rcx), %rcx
movq 0x10(%rcx), %rcx
movq 0x10(%rcx), %rcx
movq %rcx, 0x18(%rbx)
movw %cx, 0x4(%rax)
movw $0x201, (%rax)          # imm = 0x201
movq %rax, (%rbx)
movl $0x9, %eax
jmp 0xcf19e
xorl %eax, %eax
movl %eax, %r14d
movq 0x8(%rsp), %r8
testq %r14, %r14
je 0xcf364
cmpq $0x2, %r15
je 0xcf51d
cmpq $0x1, %r15
jne 0xcf531
movq %r12, %r15
movq %r13, %rcx
movq 0x28(%r13), %rax
movq 0x8(%rax), %r13
movq 0x20(%rax), %r12
leaq -0xa524(%rip), %rax     # 0xc4df7
cmpq %rax, %r14
je 0xcf5e8
movq %rcx, 0x28(%rsp)
movq %rbx, %rdi
movq %r8, %rsi
callq *%r14
movq %rbx, %rdi
movq %r13, %rsi
callq *%r12
movq 0x28(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r15
movq 0x8(%rsp), %r8
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf329
jmp 0xcf18d
movq 0x18(%rsp), %r14
cmpq $0x1, %r15
jne 0xceec1
movq 0x8(%r8), %rax
cmpq 0x18d8(%rbx), %rax
jne 0xceec1
movq 0x10(%r8), %rax
cmpb $0x1, (%rax)
jne 0xceec1
movq 0x8(%rax), %rcx
cmpb $0xa, (%rcx)
jne 0xceec1
movq 0x10(%rax), %r15
cmpb $0x1, (%r15)
jne 0xceec1
movzwl 0x6(%r15), %eax
movl %eax, 0x34(%rsp)
testb $0x4, %al
jne 0xcf3cd
movq 0x8(%r15), %rsi
movq %rbx, %rdi
callq 0xd5a05
testb %al, %al
je 0xceec1
movq 0x10(%r15), %rax
cmpq 0x110(%rbx), %rax
jne 0xceec1
movl 0x34(%rsp), %eax
testb $0x4, %al
jne 0xcf405
movq 0x8(%rbx), %rdx
leaq -0x17269(%rip), %rcx    # 0xb8188
movq %rbx, %rdi
movq %r15, %rsi
callq 0xb69b9
movq %rax, 0x20(%r15)
orb $0x4, 0x6(%r15)
movq 0x8(%r15), %rax
movq %rax, 0x90(%rsp)
movq 0x20(%r15), %rax
movq %rax, 0x88(%rsp)
movq 0x8(%rsp), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq 0xccb2
movq %rax, %r15
cmpq 0x128(%rbx), %rax
jne 0xcf4ab
movq 0x1958(%rbx), %rsi
movq 0x820(%rbx), %rax
movslq 0x7dc(%rbx), %rcx
movq (%rax,%rcx,8), %rax
incl %ecx
andl $0x7, %ecx
movl %ecx, 0x7dc(%rbx)
leaq 0x5204c(%rip), %rcx     # 0x1214b5
movq %rcx, 0x10(%rax)
movq $0x14, 0x8(%rax)
movq 0x8(%rsp), %rcx
movq 0x10(%rcx), %rcx
movq 0x8(%rcx), %rcx
movq 0x6e0(%rbx), %rdx
movq %rax, 0x8(%rdx)
movq 0x6e0(%rbx), %rax
movq 0x10(%rax), %rax
movq %rcx, 0x8(%rax)
movq 0x6e0(%rbx), %rdx
movq %rbx, %rdi
callq 0x3b366
movq %r15, 0x68(%rsp)
movq %r13, 0x28(%rsp)
movq 0x28(%r13), %rax
movq 0x8(%rax), %rcx
movq %rcx, 0x58(%rsp)
movq 0x20(%rax), %rax
movq %rax, 0x50(%rsp)
movq 0x90(%rsp), %r15
movq 0x88(%rsp), %r13
movq %rbx, %rdi
movq %r15, %rsi
callq *%r13
movq 0x68(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq 0x58(%rsp), %rsi
callq *0x50(%rsp)
movq 0x28(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf4db
jmp 0xced07
movq 0x20(%rsp), %rax
movq 0x18(%rax), %r13
cmpq $0x0, 0x18(%r13)
je 0xcf63a
movq 0x20(%rsp), %r13
movq %rbx, %rdi
movq %r8, %rsi
callq *%r14
testq %r13, %r13
je 0xcf56c
movq %r13, %r15
testb $0x2, 0x3(%r15)
je 0xcf560
movq 0x28(%r15), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, 0x10(%r15)
movq 0x18(%r15), %rax
movq %rax, %r15
testq %rax, %rax
jne 0xcf547
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
movq 0x8(%rsp), %r8
je 0xcf536
jmp 0xcf18d
movq 0x10(%rdx), %rax
cmpb $0xb, (%rax)
jne 0xcf1fb
leaq 0x8d79(%rip), %rcx      # 0xd8319
cmpq %rcx, %r12
jne 0xcf1fb
movq 0x10(%r14), %rcx
movq 0x10(%rcx), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rcx), %r14
movq 0x8(%rax), %rax
cmpq %r14, %rax
jle 0xcf238
movq %rax, %r12
decq %r12
movq 0x8(%r13), %rsi
movq %rbx, %rdi
callq *0x20(%r13)
movq %rax, 0x10(%r15)
movq %r12, %rax
cmpq %r14, %r12
jg 0xcf5c6
jmp 0xcf238
movq 0x2260(%rbx), %rax
movq %rax, 0x48(%rsp)
movq (%rax), %rax
movq %rax, 0x40(%rsp)
movq %rcx, %r14
movl $0x0, 0x2258(%rbx)
movq 0x48(%rsp), %rdi
callq *0x40(%rsp)
movq %rbx, %rdi
movq %r13, %rsi
callq *%r12
movq %rax, 0x10(%r14)
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r15
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf5ff
jmp 0xcf18d
movq 0x20(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x8(%rax), %rcx
movq %rcx, 0x80(%rsp)
movq 0x20(%rax), %rax
movq %rax, 0x78(%rsp)
movq 0x28(%r13), %rax
movq %r12, 0x70(%rsp)
movq %rbp, %r12
movq 0x8(%rax), %rbp
movq 0x20(%rax), %r15
movq %rbx, %rdi
movq %r8, %rsi
callq *%r14
movq %rbx, %rdi
movq 0x80(%rsp), %rsi
callq *0x78(%rsp)
movq 0x20(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r15
movq %rax, 0x10(%r13)
movq %rbx, %rdi
movq %r12, %rsi
callq *0x70(%rsp)
movq 0x8(%rsp), %r8
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0xcf66c
jmp 0xcf18d