// File: /workspace/github_c_makefile_star2_O2/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 $0xa8, %rsp
movq %rdi, %rbx
movq (%rdi), %rax
movq 0x90(%rdi), %rcx
movq %rax, 0x28(%rdi)
movq %rax, 0x98(%rsp)
movq 0x10(%rax), %rax
movq %rax, (%rdi)
movq %rcx, %rax
cmpq 0x98(%rdi), %rcx
ja 0x9be1d
movq %rbx, %rdi
callq 0x9c27
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rcx
movq $0x20001c, (%rcx)       # imm = 0x20001C
movq 0x250(%rbx), %rax
incq %rax
movq %rax, 0x250(%rbx)
movq %rax, 0x18(%rcx)
andq $0x0, 0x8(%rcx)
leaq 0x8(%rcx), %r12
movq 0x8(%rbx), %rax
movq %rax, 0x10(%rcx)
movq %rcx, 0x88(%rsp)
movq %rcx, 0x540(%rbx)
movq (%rbx), %rax
addq $0x8, %rax
xorl %ecx, %ecx
movl %ecx, %ebp
movq %rbp, %r15
movq (%rax), %r13
cmpb $0x1, (%r13)
jne 0x9befb
movq 0x8(%r13), %rax
movq 0x10(%rax), %r14
movq 0x8(%r14), %rsi
movq %rbx, %rdi
callq *0x20(%r14)
movq 0x90(%rbx), %rcx
leaq -0x8(%rcx), %rdx
movq %rdx, 0x90(%rbx)
movq -0x8(%rcx), %rcx
movq $0x20, (%rcx)
movq 0x8(%r13), %rdx
movq 0x8(%rdx), %rdx
movq %rdx, 0x8(%rcx)
movq %rax, 0x10(%rcx)
movq 0x10(%r14), %rax
cmpb $0x1, (%rax)
jne 0x9bed8
incq %r15
movq $0x2000020, (%rcx)      # imm = 0x2000020
movq %rcx, %rbp
jmp 0x9bedf
movq 0x110(%rbx), %rax
movq %rax, 0x28(%rcx)
movq (%r12), %rax
movq %rax, 0x18(%rcx)
movq %rcx, (%r12)
addq $0x10, %r13
movq %r13, %rax
jmp 0x9be76
movq 0x88(%rsp), %rcx
movq %rcx, 0x8(%rbx)
movq 0x110(%rbx), %rax
movq %rax, 0x540(%rbx)
movq 0x18(%rcx), %rax
movq (%r12), %rcx
testq %rcx, %rcx
je 0x9bf42
movq 0x8(%rcx), %rdx
movq %rcx, 0x18(%rdx)
movq 0x8(%rcx), %rdx
movq %rax, 0x20(%rdx)
movq 0x8(%rcx), %rdx
incl 0x28(%rdx)
addq $0x18, %rcx
movq %rcx, %r12
jmp 0x9bf19
movq (%rbx), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %r13
movq 0x8(%r13), %r14
movq 0x20(%r13), %r12
movq %rbx, %rdi
movq %r14, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0x9bf74
movq 0x10(%r13), %rax
jmp 0x9c233
movq (%rbx), %rcx
movq 0x110(%rbx), %rax
movq 0x10(%rcx), %rcx
movq 0x10(%rcx), %rdi
cmpq %rax, %rdi
movq %r13, 0x20(%rsp)
je 0x9c09d
movq 0x8(%rbx), %rsi
movq 0x8(%rsi), %rcx
movq %rcx, 0x28(%rsp)
cmpq %rax, 0x10(%rdi)
movq %r14, 0x18(%rsp)
movq %rdi, 0x8(%rsp)
jne 0x9c001
movq 0x8(%rdi), %rcx
cmpb $0x1, (%rcx)
jne 0x9c001
testb $0x4, 0x3(%rdi)
movq %rcx, 0x10(%rsp)
jne 0x9c141
movq %rbx, %rdi
callq 0xab3ba
movq 0x10(%rsp), %rcx
testb %al, %al
je 0x9c141
movq %rbx, %rdi
movq 0x8(%rsp), %rsi
callq 0x38c23
movq 0x10(%rsp), %rcx
testq %rax, %rax
je 0x9c141
movq %rax, %r14
jmp 0x9c17d
movq %r12, 0xa0(%rsp)
xorl %eax, %eax
movl %eax, %ecx
movl %eax, %edx
testb $0x4, 0x3(%rdi)
jne 0x9c3ec
movq %rbx, %rdi
callq 0xab3ba
xorl %edx, %edx
movl %edx, %ecx
movq 0x8(%rsp), %rdi
testb %al, %al
je 0x9c3ec
leaq 0x2190(%rbx), %rdi
callq 0x8350
xorl %edx, %edx
movl %edx, %ecx
movq 0x8(%rsp), %rdi
testl %eax, %eax
jne 0x9c3ec
andl $0x0, 0x2258(%rbx)
xorl %r14d, %r14d
movq 0x8(%rsp), %r12
cmpb $0x1, (%r12)
jne 0x9c3b5
movslq 0x2258(%rbx), %rax
movq 0x2260(%rbx,%rax,8), %r13
movq %rbx, %rdi
movq %r12, %rsi
callq 0x80a38
testb %al, %al
je 0x9c3d6
movq %r13, %rdi
callq 0x86fde
movq 0x10(%r12), %r12
incl %r14d
jmp 0x9c05e
leaq -0xe76f(%rip), %rax     # 0x8d935
cmpq %rax, %r12
jne 0x9c0b4
movq %r14, %rcx
movq 0x10(%r14), %r14
movq 0x20(%rcx), %r12
cmpq $0x1, %r15
jne 0x9c0da
movq 0x28(%rbp), %rdx
movq 0x8(%rdx), %rcx
movq 0x20(%rdx), %rdx
cmpq %rax, %rdx
je 0x9c1e5
movq %rcx, %r15
movq %rdx, %r13
jmp 0x9c1ed
movq 0x8(%rbx), %rax
movq 0x8(%rax), %r13
movq %r13, %rcx
cmpq $0x2, %r15
jne 0x9c0fd
movq 0x18(%r13), %rdx
cmpq $0x0, 0x18(%rdx)
movq %r13, %rcx
je 0x9c322
testq %rcx, %rcx
je 0x9c123
movq %rcx, %r15
testb $0x2, 0x3(%rcx)
je 0x9c11d
movq 0x28(%r15), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, 0x10(%r15)
movq 0x18(%r15), %rcx
jmp 0x9c0fd
movq %rbx, %rdi
movq %r14, %rsi
callq *%r12
movq %rax, 0x20(%rbx)
movq %r13, %rcx
cmpq 0x120(%rbx), %rax
je 0x9c0fd
jmp 0x9c22a
movq %rbx, %rdi
movq %rcx, %rsi
callq 0xa2689
testb %al, %al
je 0x9c276
movq 0x8(%rbx), %rdx
leaq -0xe9c4(%rip), %rcx     # 0x8d79b
movq %rbx, %rdi
movq 0x8(%rsp), %rsi
callq 0x8c0ba
testq %rax, %rax
je 0x9c276
movq %rax, %r14
movq 0x10(%rsp), %rcx
cmpq $0x2, %r15
je 0x9c613
cmpq $0x1, %r15
jne 0x9c62c
movq 0x28(%rbp), %rax
movq 0x8(%rax), %r13
movq 0x20(%rax), %rdx
leaq -0x73b4(%rip), %rax     # 0x94df0
cmpq %rax, %r14
je 0x9c6d9
movq %rdx, %r15
movq %rbx, %rdi
movq %rcx, %rsi
callq *%r14
movq %rbx, %rdi
movq %r13, %rsi
callq *%r15
movq %rax, 0x10(%rbp)
movq %rbx, %rdi
movq 0x18(%rsp), %rsi
callq *%r12
movq 0x10(%rsp), %rcx
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0x9c1b0
jmp 0x9c22a
movq 0x10(%rcx), %r15
movq 0x20(%rcx), %r13
leaq -0xe70a(%rip), %rax     # 0x8daea
cmpq %rax, %r13
jne 0x9c207
movq 0x10(%r15), %rax
movq 0x8(%rax), %rax
cmpq 0x8(%rbp), %rax
je 0x9c24b
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 0x9c207
movq 0x20(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, (%rbx)
pushq $0x3
popq %rax
addq $0xa8, %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 0x9c24b
movq 0x118(%rbx), %rax
movq %rax, 0x20(%rbx)
jmp 0x9c22a
cmpq $0x1, %r15
movq 0x10(%rsp), %rcx
jne 0x9c425
movq 0x8(%rcx), %rax
cmpq 0x18d8(%rbx), %rax
jne 0x9c425
movq 0x10(%rcx), %rcx
cmpb $0x1, (%rcx)
jne 0x9c425
movq 0x8(%rcx), %rax
cmpb $0xa, (%rax)
jne 0x9c425
movq 0x10(%rcx), %r14
cmpb $0x1, (%r14)
jne 0x9c425
testb $0x4, 0x6(%r14)
jne 0x9c7b1
movq 0x8(%r14), %rsi
movq %rbx, %rdi
callq 0xa2689
movq 0x10(%rsp), %rcx
testb %al, %al
je 0x9c425
movq 0x10(%r14), %rax
cmpq 0x110(%rbx), %rax
jne 0x9c425
movq %rcx, %r15
movq 0x8(%rbx), %rdx
leaq -0xeb66(%rip), %rcx     # 0x8d79b
movq %rbx, %rdi
movq %r14, %rsi
callq 0x8c0ba
movq %rax, 0x20(%r14)
orb $0x4, 0x6(%r14)
movq 0x10(%r15), %rcx
movq 0x8(%rcx), %rsi
jmp 0x9c7cc
movq 0x28(%r13), %r15
movq 0x28(%rdx), %rbp
leaq 0x8991(%rip), %rax      # 0xa4cc2
cmpq %rax, 0x20(%rbp)
je 0x9c685
movq %rdx, 0x60(%rsp)
movq 0x8(%r15), %rsi
movq %rbx, %rdi
callq *0x20(%r15)
movq %rax, 0x10(%r13)
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 0x9c340
movq 0x20(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, (%rbx)
movq 0x8(%rax), %rsi
cmpb $0xa, (%rsi)
jne 0x9c236
movq %rbx, %rdi
callq 0xb00b
movq 0x10(%rax), %rcx
movq %rcx, 0x20(%rbx)
xorl %eax, %eax
cmpb $0xd, (%rcx)
jne 0x9c239
andb $-0x5, 0x3(%rcx)
jmp 0x9c239
cmpq 0x110(%rbx), %r12
sete %dl
movl %r14d, %ecx
movl %edx, %esi
movq %r12, %rdi
movl %r14d, %eax
movq %r12, %r13
cmpq 0x8(%rsp), %r12
jne 0x9c418
jmp 0x9c3ec
movq 0x8(%rsp), %rdi
orb $0x4, 0x3(%rdi)
cmpq 0x110(%rbx), %rdi
sete %dl
movl %r14d, %ecx
movl %edx, %r14d
movl %ecx, %r12d
movq %rdi, %r13
cmpb $0x1, (%r13)
jne 0x9c412
movq 0x8(%r13), %rsi
movq %rbx, %rdi
callq 0xa2689
testb %al, %al
je 0x9c412
movq 0x10(%r13), %r13
jmp 0x9c3f5
movl %r12d, %eax
movl %r14d, %esi
cmpq 0x110(%rbx), %r13
je 0x9c4fa
movq 0x8(%rsp), %rcx
movq 0x10(%rcx), %rax
cmpq 0x110(%rbx), %rax
jne 0x9c491
movq 0x8(%rcx), %rax
cmpb $0x1, (%rax)
jne 0x9c491
cmpw $0x201, (%rax)          # imm = 0x201
je 0x9c452
movq 0x8(%rax), %rcx
cmpw $0x20a, (%rcx)          # imm = 0x20A
jne 0x9c491
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 0x9c5ec
movzwl 0x4(%rax), %ecx
movq %rcx, 0x18(%rbx)
jmp 0x9c609
movq 0x98(%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)
pushq $0x1
jmp 0x9c238
movl %esi, %r13d
movl %eax, %r14d
testb %sil, %sil
jne 0x9c516
movq 0x8(%rbx), %rdx
movq %rbx, %rdi
movq 0x8(%rsp), %rsi
callq 0xa5dd4
testq %rbp, %rbp
movl %r14d, 0x34(%rsp)
je 0x9c52e
movq 0x28(%rbp), %rax
movq 0x8(%rax), %r12
movq 0x20(%rax), %rax
jmp 0x9c52e
movq %rax, 0x90(%rsp)
movq 0x8(%rsp), %r14
testb %r13b, %r13b
je 0x9c570
andl $0x0, 0x2258(%rbx)
xorl %eax, %eax
movl 0x34(%rsp), %r14d
subl $0x1, %r14d
jb 0x9c587
cltq
movq 0x2260(%rbx,%rax,8), %rdi
callq *(%rdi)
movl 0x2258(%rbx), %eax
incl %eax
movl %eax, 0x2258(%rbx)
jmp 0x9c54e
cmpb $0x1, (%r14)
jne 0x9c587
movq 0x8(%r14), %rsi
movq %rbx, %rdi
callq *0x20(%r14)
movq 0x10(%r14), %r14
jmp 0x9c570
movq 0x28(%rsp), %r14
cmpq $0x1, %r15
jne 0x9c5c8
movq %rbx, %rdi
movq %r12, %rsi
callq *0x90(%rsp)
movq %rax, 0x10(%rbp)
movq %rbx, %rdi
movq 0x18(%rsp), %rsi
callq *0xa0(%rsp)
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0x9c536
jmp 0x9c22a
testq %r14, %r14
je 0x9c5a3
testb $0x2, 0x3(%r14)
je 0x9c5e6
movq 0x28(%r14), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, 0x10(%r14)
movq 0x18(%r14), %r14
jmp 0x9c5c8
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)
pushq $0x9
jmp 0x9c238
movq 0x28(%rsp), %rax
movq 0x18(%rax), %rax
movq %rax, 0x38(%rsp)
cmpq $0x0, 0x18(%rax)
je 0x9c730
movq %rbx, %rdi
movq %rcx, %rsi
callq *%r14
movq 0x28(%rsp), %r15
movq %r12, %rbp
testq %r15, %r15
je 0x9c661
testb $0x2, 0x3(%r15)
je 0x9c65b
movq 0x28(%r15), %rax
movq 0x8(%rax), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, 0x10(%r15)
movq 0x18(%r15), %r15
jmp 0x9c63d
movq %rbx, %rdi
movq 0x18(%rsp), %rsi
movq %rbp, %r12
callq *%rbp
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
movq 0x10(%rsp), %rcx
je 0x9c62c
jmp 0x9bf6b
movq 0x10(%rdx), %rax
cmpb $0xb, (%rax)
jne 0x9c33b
leaq 0x8447(%rip), %rcx      # 0xa4ae0
cmpq %rcx, %r12
jne 0x9c33b
movq 0x10(%r14), %rcx
movq 0x10(%rcx), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rcx), %r14
movq 0x8(%rax), %rax
cmpq %r14, %rax
jle 0x9c378
movq %rax, %r12
decq %r12
movq 0x8(%r15), %rsi
movq %rbx, %rdi
callq *0x20(%r15)
movq %rax, 0x10(%r13)
movq %r12, %rax
jmp 0x9c6b6
movq 0x2260(%rbx), %rax
movq %rax, 0x48(%rsp)
movq (%rax), %rax
movq %rax, 0x40(%rsp)
movq 0x18(%rsp), %r14
movq %r13, %r15
movq %rdx, %r13
andl $0x0, 0x2258(%rbx)
movq 0x48(%rsp), %rdi
callq *0x40(%rsp)
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 0x9c6f8
jmp 0x9c22a
movq 0x28(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x8(%rax), %rdx
movq %rdx, 0x78(%rsp)
movq 0x20(%rax), %rax
movq %rax, 0x70(%rsp)
movq 0x38(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x8(%rax), %r13
movq 0x20(%rax), %r15
movq 0x18(%rsp), %rbp
movq %rbx, %rdi
movq %rcx, %rsi
callq *%r14
movq %rbx, %rdi
movq 0x78(%rsp), %rsi
callq *0x70(%rsp)
movq 0x28(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq %r13, %rsi
callq *%r15
movq 0x38(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq %rbp, %rsi
callq *%r12
movq 0x10(%rsp), %rcx
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0x9c761
jmp 0x9c22a
movq 0x10(%r14), %rcx
cmpq 0x110(%rbx), %rcx
jne 0x9c425
movq 0x20(%r14), %rcx
movq %rax, %rsi
movq %rcx, %rax
movq %rax, 0x80(%rsp)
movq 0x8(%r14), %r15
movq %rbx, %rdi
callq 0xb00b
movq %rax, %r14
cmpq 0x128(%rbx), %rax
jne 0x9c859
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 0x47d4e(%rip), %rcx     # 0xe4565
movq %rcx, 0x10(%rax)
movq $0x14, 0x8(%rax)
movq 0x10(%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 0x2cdc0
movq %r14, 0x68(%rsp)
movq 0x28(%rbp), %rax
movq 0x8(%rax), %rcx
movq %rcx, 0x58(%rsp)
movq 0x20(%rax), %rax
movq %rax, 0x50(%rsp)
movq 0x80(%rsp), %r14
movq %rbx, %rdi
movq %r15, %rsi
callq *%r14
movq 0x68(%rsp), %rcx
movq %rax, 0x10(%rcx)
movq %rbx, %rdi
movq 0x58(%rsp), %rsi
callq *0x50(%rsp)
movq %rax, 0x10(%rbp)
movq %rbx, %rdi
movq 0x18(%rsp), %rsi
callq *%r12
movq %rax, 0x20(%rbx)
cmpq 0x120(%rbx), %rax
je 0x9c87c
jmp 0x9bf6b