// File: /workspace/github_c_makefile_star2_O2/BernardTatin[P]s7sh/s7.c
// Function: pair_to_port
static void pair_to_port(s7_scheme *sc, s7_pointer lst, s7_pointer port, use_write_t use_write, shared_info *ci)
    {
        /* we need list_to_starboard... (making port_write_string|character local was noticeably slower) */
        s7_pointer x;
        s7_int i, len, true_len;

        true_len = s7_list_length(sc, lst);
        if (true_len < 0)                    /* a dotted list -- handle cars, then final cdr */
            len = (-true_len + 1);
        else
        {
            if (true_len == 0)               /* circular list (nil is handled by unique_to_port) */
                len = circular_list_entries(lst);
            else len = true_len;
        }

        if ((use_write == P_READABLE) &&
                (ci))
        {
            int32_t href;
            href = peek_shared_ref(ci, lst);
            if (href != 0)
            {
                if (href < 0) href = -href;
                if ((ci->defined[href]) || (port == ci->cycle_port))
                {
                    char buf[128];
                    int32_t plen;
                    plen = catstrs_direct(buf, "<", pos_int_to_str_direct(sc, href), ">", NULL);
                    port_write_string(port)(sc, buf, plen, port);
                    return;
                }
            }
        }

        if ((use_write != P_READABLE) &&
                (car(lst) == sc->quote_symbol) &&
                (true_len == 2))
        {
            /* len == 1 is important, otherwise (list 'quote 1 2) -> '1 2 which looks weird
             *   or (object->string (apply . `''1)) -> "'quote 1"
             * so (quote x) = 'x but (quote x y z) should be left alone (if evaluated, it's an error)
             * :readable is tricky because the list might be something like (list 'quote (lambda () #f)) which needs to be evalable back to its original
             */
            port_write_character(port)(sc, '\'', port);
            object_to_port_with_circle_check(sc, cadr(lst), port, P_WRITE, ci);
            return;
        }

        port_write_character(port)(sc, '(', port);
        if (is_multiple_value(lst))
            port_write_string(port)(sc, "values ", 7, port);

        check_stack_size(sc);
        push_stack_no_let_no_code(sc, OP_GC_PROTECT, lst);
        /* (define (f) (display (make-list 1001 (mock-string #\h #\o #\h #\o))) (newline)) (do ((i 0 (+ i 1))) ((= i 1000)) (f)) */

        if (use_write == P_READABLE)
        {
            if (!is_cyclic(lst))
            {
                simple_list_readable_display(sc, lst, true_len, len, port, ci);
                unstack(sc);
                return;
            }
            if (ci)
            {
                int32_t plen;
                char buf[128], lst_name[128];
                int32_t lst_ref;
                bool lst_local = false;
                s7_pointer local_port;

                lst_ref = peek_shared_ref(ci, lst);
                if (lst_ref == 0)
                {
                    s7_pointer p;
                    for (p = lst; is_pair(p); p = cdr(p))
                        if ((has_structure(car(p))) ||
                                ((is_pair(cdr(p))) &&
                                 (peek_shared_ref(ci, cdr(p)) != 0)))
                        {
                            lst_name[0] = '<'; lst_name[1] = 'L'; lst_name[2] = '>'; lst_name[3] = '\0';
                            lst_local = true;
                            port_write_string(port)(sc, "let ((<L> (list", 15, port); /* '(' above */
                            break;
                        }
                    if ((!lst_local) && (!is_null(p)))
                    {
                        if (has_structure(p))
                        {
                            lst_name[0] = '<'; lst_name[1] = 'L'; lst_name[2] = '>'; lst_name[3] = '\0';
                            lst_local = true;
                            port_write_string(port)(sc, "let ((<L> (list", 15, port); /* '(' above */
                        }
                    }
                    if (!lst_local)
                    {
                        simple_list_readable_display(sc, lst, true_len, len, port, ci);
                        unstack(sc);
                        return;
                    }
                }
                else
                {
                    if (lst_ref < 0) lst_ref = -lst_ref;
                    catstrs_direct(lst_name, "<", pos_int_to_str_direct(sc, lst_ref), ">", NULL);
                    port_write_string(port)(sc, "list", 4, port); /* '(' above */
                }

                for (i = 0, x = lst; (i < len) && (is_pair(x)); x = cdr(x), i++)
                {
                    if ((has_structure(car(x))) &&
                            (is_cyclic(car(x))))
                        port_write_string(port)(sc, " #f", 3, port);
                    else
                    {
                        port_write_character(port)(sc, ' ', port);
                        object_to_port_with_circle_check(sc, car(x), port, use_write, ci);
                    }
                    if ((is_pair(cdr(x))) &&
                            (peek_shared_ref(ci, cdr(x)) != 0))
                        break;
                }

                if (lst_local)
                    port_write_string(port)(sc, ")))\n", 4, port);
                else port_write_character(port)(sc, ')', port);

                /* fill in the cyclic entries */
                local_port = ((lst_local) || (ci->cycle_port == sc->F)) ? port : ci->cycle_port; /* (object->string (list-values `(x . 1) (signature (int-vector))) :readable) */
                for (x = lst, i = 0; (i < len) && (is_pair(x)); x = cdr(x), i++)
                {
                    int32_t lref;
                    if ((has_structure(car(x))) &&
                            (is_cyclic(car(x))))
                    {
                        if (i == 0)
                            plen = catstrs_direct(buf, "  (set-car! ", lst_name, " ", NULL);
                        else plen = catstrs_direct(buf, "  (set! (", lst_name, " ", pos_int_to_str_direct(sc, i), ") ", NULL);
                        port_write_string(local_port)(sc, buf, plen, local_port);
                        lref = peek_shared_ref(ci, car(x));
                        if (lref == 0)
                            object_to_port_with_circle_check(sc, car(x), local_port, use_write, ci);
                        else
                        {
                            if (lref < 0) lref = -lref;
                            plen = catstrs_direct(buf, "<", pos_int_to_str_direct(sc, lref), ">", NULL);
                            port_write_string(local_port)(sc, buf, plen, local_port);
                        }
                        port_write_string(local_port)(sc, ")\n", 2, local_port);
                    }
                    if ((is_pair(cdr(x))) &&
                            ((lref = peek_shared_ref(ci, cdr(x))) != 0))
                    {
                        if (lref < 0) lref = -lref;
                        if (i == 0)
                            plen = catstrs_direct(buf, (lst_local) ? "    " : "  ", "(set-cdr! ", lst_name, " <", pos_int_to_str_direct(sc, lref), ">)\n", NULL);
                        else
                        {
                            if (i == 1)
                                plen = catstrs_direct(buf, (lst_local) ? "    " : "  ", "(set-cdr! (cdr ", lst_name, ") <", pos_int_to_str_direct(sc, lref), ">)\n", NULL);
                            else plen = catstrs_direct(buf, (lst_local) ? "    " : "  ",
                                    "(set-cdr! (list-tail ", lst_name, " ", pos_int_to_str_direct_1(sc, i),
                                    ") <", pos_int_to_str_direct(sc, lref), ">)\n", NULL);
                        }
                        port_write_string(local_port)(sc, buf, plen, local_port);
                        break;
                    }
                }
                if (true_len < 0) /* dotted list */
                {
                    s7_pointer end_x;
                    for (end_x = lst; is_pair(end_x); end_x = cdr(end_x)); /* or maybe faster, start at x? */
                    /* we can't depend on the loops above to set x to the last element because they sometimes break out */
                    if (true_len == -1) /* cons cell */
                        plen = catstrs_direct(buf, (lst_local) ? "    " : "  ", "(set-cdr! ", lst_name, " ", NULL);
                    else
                    {
                        if (true_len == -2)
                            plen = catstrs_direct(buf, (lst_local) ? "    " : "  ", "(set-cdr! (cdr ", lst_name, ") ", NULL);
                        else plen = catstrs_direct(buf, "(set-cdr! (list-tail ", lst_name, " ", pos_int_to_str_direct(sc, len - 2), ") ", NULL);
                    }
                    port_write_string(local_port)(sc, buf, plen, local_port);
                    object_to_port_with_circle_check(sc, end_x, local_port, use_write, ci);
                    port_write_string(local_port)(sc, ")\n", 2, local_port);
                }

                if (lst_local)
                    port_write_string(local_port)(sc, "    <L>)", 8, local_port);
            }
            else simple_list_readable_display(sc, lst, true_len, len, port, ci);
        }
        else /* not :readable */
        {
            s7_int plen;
            plen = (len > sc->print_length) ? sc->print_length : len;
            if (plen <= 0)
            {
                port_write_string(port)(sc, "(...))", 6, port); /* open paren above about 150 lines, "list" here is wrong if it's a cons */
                unstack(sc);
                return;
            }

            if (ci)
            {
                for (x = lst, i = 0; (is_pair(x)) && (i < plen) && ((i == 0) || (peek_shared_ref(ci, x) == 0)); i++, x = cdr(x))
                {
                    object_to_port_with_circle_check(sc, car(x), port, NOT_P_DISPLAY(use_write), ci);
                    if (i < (len - 1))
                        port_write_character(port)(sc, ' ', port);
                }
                if (is_not_null(x))
                {
                    if (plen < len)
                        port_write_string(port)(sc, " ...", 4, port);
                    else
                    {
                        if ((true_len == 0) &&
                                (i == len))
                            port_write_string(port)(sc, " . ", 3, port);
                        else port_write_string(port)(sc, ". ", 2, port);
                        object_to_port_with_circle_check(sc, x, port, NOT_P_DISPLAY(use_write), ci);
                    }
                }
                port_write_character(port)(sc, ')', port);
            }
            else
            {
                s7_int len1;
                len1 = plen - 1;
                if (is_string_port(port))
                {
                    for (x = lst, i = 0; (is_pair(x)) && (i < len1); i++, x = cdr(x))
                    {
                        object_to_port(sc, car(x), port, NOT_P_DISPLAY(use_write), ci);
                        if (port_position(port) >= sc->objstr_max_len)
                        {
                            unstack(sc);
                            return;
                        }
                        if (port_position(port) >= port_data_size(port))
                            resize_port_data(sc, port, port_data_size(port) * 2);
                        port_data(port)[port_position(port)++] = (uint8_t)' ';
                    }
                }
                else
                {
                    for (x = lst, i = 0; (is_pair(x)) && (i < len1); i++, x = cdr(x))
                    {
                        object_to_port(sc, car(x), port, NOT_P_DISPLAY(use_write), ci);
                        port_write_character(port)(sc, ' ', port);
                    }
                }
                if (is_pair(x))
                {
                    object_to_port(sc, car(x), port, NOT_P_DISPLAY(use_write), ci);
                    x = cdr(x);
                }
                if (is_not_null(x))
                {
                    if (plen < len)
                        port_write_string(port)(sc, " ...", 4, port);
                    else
                    {
                        port_write_string(port)(sc, ". ", 2, port);
                        object_to_port(sc, x, port, NOT_P_DISPLAY(use_write), ci);
                    }
                }
                port_write_character(port)(sc, ')', port);
            }
        }
        unstack(sc);
    }

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x158, %rsp            # imm = 0x158
movq %r8, %r13
movl %ecx, 0x28(%rsp)
movq %rdx, %r14
movq %rsi, %r12
movq %rdi, %rbx
callq 0x2dada
movq %rax, %r15
testq %rax, %rax
js 0xbde54
movq %r15, %rbp
jne 0xbde5a
movq %r12, %rdi
callq 0x7b825
movslq %eax, %rbp
jmp 0xbde5a
pushq $0x1
popq %rbp
subq %r15, %rbp
movl 0x28(%rsp), %edx
cmpl $0x2, %edx
setne %al
testq %r13, %r13
sete %cl
orb %al, %cl
jne 0xbdedc
movq %r13, %rdi
movq %r12, %rsi
callq 0x7855f
testl %eax, %eax
je 0xbdee5
movl %eax, %esi
negl %esi
cmovsl %eax, %esi
movq 0x48(%r13), %rax
cmpb $0x0, (%rax,%rsi)
jne 0xbde94
cmpq %r14, 0x28(%r13)
jne 0xbdee5
movq %rbx, %rdi
callq 0x91f9
leaq 0x28968(%rip), %rsi     # 0xe680b
leaq 0x28c37(%rip), %rcx     # 0xe6ae1
leaq 0x50(%rsp), %r15
movq %r15, %rdi
movq %rax, %rdx
xorl %r8d, %r8d
xorl %eax, %eax
callq 0xb3a5
movq 0x8(%r14), %rcx
movq 0x48(%rcx), %r8
movslq %eax, %rdx
movq %rbx, %rdi
movq %r15, %rsi
movq %r14, %rcx
callq *0x10(%r8)
jmp 0xbea99
cmpl $0x2, %edx
jne 0xbe05e
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
pushq $0x28
popq %rsi
movq %rbx, %rdi
movq %r14, %rdx
callq *0x8(%rax)
cmpw $0x0, (%r12)
jns 0xbdf1c
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x2864f(%rip), %rsi     # 0xe655f
pushq $0x7
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
movq 0x50(%rbx), %rax
cmpq 0x58(%rbx), %rax
jb 0xbdf32
movq %rbx, %rdi
callq 0x91caf
movq 0x50(%rbx), %rax
movq %r12, 0x10(%rax)
movq 0x50(%rbx), %rax
movq $0x1, 0x18(%rax)
addq $0x20, 0x50(%rbx)
movl 0x28(%rsp), %ecx
cmpl $0x2, %ecx
jne 0xbdf73
testb $0x20, 0x6(%r12)
jne 0xbe0e5
movq %rbx, %rdi
movq %r12, %rsi
movq %r15, %rdx
movq %rbp, %rcx
movq %r14, %r8
movq %r13, %r9
jmp 0xbe260
movq %r15, 0x40(%rsp)
movq 0x280(%rbx), %rax
cmpq %rax, %rbp
movq %rax, %r15
cmovlq %rbp, %r15
testq %r15, %r15
jle 0xbe1a3
movq %rax, 0x38(%rsp)
testq %r13, %r13
movq %rbp, 0x30(%rsp)
je 0xbe1b9
cmpl $0x1, %ecx
adcl $0x0, %ecx
movl %ecx, 0x28(%rsp)
movq %r12, %rax
leaq -0x1(%rbp), %rcx
movq %rcx, 0x48(%rsp)
xorl %ebp, %ebp
movq %rax, %r12
cmpb $0x1, (%rax)
jne 0xbe166
cmpq %r15, %rbp
jge 0xbe166
testq %rbp, %rbp
je 0xbdfea
movq %r13, %rdi
movq %r12, %rsi
callq 0x7855f
testl %eax, %eax
jne 0xbe166
movq 0x8(%r12), %rsi
movzbl (%rsi), %eax
leaq 0x63347(%rip), %rcx     # 0x121340
cmpb $0x1, (%rax,%rcx)
jne 0xbe01e
cmpl $0x15, %eax
jne 0xbe00a
testb $0x1, 0x7(%rsi)
jne 0xbe01e
movq %rbx, %rdi
movq %r14, %rdx
movl 0x28(%rsp), %ecx
movq %r13, %r8
callq 0x77872
jmp 0xbe036
movq %rbx, %rdi
movq %r14, %rdx
movl 0x28(%rsp), %ecx
movq %r13, %r8
leaq 0x6334e(%rip), %r9      # 0x121380
callq *(%r9,%rax,8)
cmpq 0x48(%rsp), %rbp
jge 0xbe051
movq %r14, %rdx
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq %rbx, %rdi
pushq $0x20
popq %rsi
callq *0x8(%rax)
incq %rbp
movq 0x10(%r12), %rax
jmp 0xbdfbd
cmpq $0x2, %r15
jne 0xbdee5
movq 0x17b0(%rbx), %rax
cmpq %rax, 0x8(%r12)
jne 0xbdee5
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
pushq $0x27
popq %rsi
movq %rbx, %rdi
movq %r14, %rdx
callq *0x8(%rax)
movq 0x10(%r12), %rax
movq 0x8(%rax), %rsi
movzbl (%rsi), %eax
testq %r13, %r13
je 0xbe83e
leaq 0x63296(%rip), %rcx     # 0x121340
cmpb $0x1, (%rax,%rcx)
jne 0xbe83e
cmpl $0x15, %eax
jne 0xbe0c3
testb $0x1, 0x7(%rsi)
jne 0xbe83b
pushq $0x1
popq %rcx
movq %rbx, %rdi
movq %r14, %rdx
movq %r13, %r8
addq $0x158, %rsp            # imm = 0x158
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x77872
testq %r13, %r13
je 0xbe24e
movq %r15, 0x40(%rsp)
movq %r13, 0x28(%rsp)
movq %r13, %rdi
movq %r12, %rsi
callq 0x7855f
testl %eax, %eax
movl %eax, 0x38(%rsp)
movq %rbp, 0x30(%rsp)
je 0xbe292
movl %eax, %esi
negl %esi
cmovsl %eax, %esi
movq %rbx, %rdi
callq 0x91f9
leaq 0x286e1(%rip), %rsi     # 0xe680b
leaq 0x289b0(%rip), %rcx     # 0xe6ae1
leaq 0xd0(%rsp), %rdi
movq %rax, %rdx
xorl %r8d, %r8d
xorl %eax, %eax
callq 0xb3a5
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x1ab05(%rip), %rsi     # 0xd8c5a
pushq $0x4
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
jmp 0xbe4af
cmpq 0x110(%rbx), %r12
je 0xbe43e
movq 0x30(%rsp), %rcx
cmpq 0x38(%rsp), %rcx
jle 0xbe26a
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x249af(%rip), %rsi     # 0xe2b41
pushq $0x4
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
jmp 0xbe43e
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x2841b(%rip), %rsi     # 0xe65cd
pushq $0x6
jmp 0xbea8a
decq %r15
movq 0x8(%r14), %rax
cmpl $0x1, %ecx
movl %ecx, %ebp
adcl $0x0, %ebp
cmpl $0x1, 0x4(%rax)
jne 0xbe2ee
xorl %r13d, %r13d
movb (%r12), %al
cmpb $0x1, %al
jne 0xbe33a
cmpq %r15, %r13
jge 0xbe33a
movq 0x8(%r12), %rsi
movzbl (%rsi), %eax
movq %rbx, %rdi
movq %r14, %rdx
movl %ebp, %ecx
xorl %r8d, %r8d
leaq 0x6317c(%rip), %r9      # 0x121380
callq *(%r9,%rax,8)
movq 0x20(%r14), %rax
cmpq 0x288(%rbx), %rax
jge 0xbea94
movq 0x18(%r14), %rdx
cmpq %rdx, %rax
jl 0xbe234
addq %rdx, %rdx
movq %rbx, %rdi
movq %r14, %rsi
callq 0x772c3
movq 0x20(%r14), %rax
movq 0x10(%r14), %rcx
leaq 0x1(%rax), %rdx
movq %rdx, 0x20(%r14)
movb $0x20, (%rcx,%rax)
incq %r13
movq 0x10(%r12), %r12
jmp 0xbe1d5
movq %rbx, %rdi
movq %r12, %rsi
movq %r15, %rdx
movq %rbp, %rcx
movq %r14, %r8
xorl %r9d, %r9d
callq 0xc2542
jmp 0xbea94
xorq %rbp, %rcx
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq 0x10(%rax), %rax
orq %rcx, 0x40(%rsp)
jne 0xbe3a5
leaq 0x28349(%rip), %rsi     # 0xe65d4
pushq $0x3
jmp 0xbe3ae
movb (%r12), %bpl
leaq 0x630a3(%rip), %r13     # 0x121340
movq %r12, %r15
cmpb $0x1, %bpl
jne 0xbe457
movq 0x8(%r15), %rax
movzbl (%rax), %ecx
cmpb $0x1, (%rcx,%r13)
jne 0xbe2cb
cmpb $0x15, %cl
jne 0xbe484
testb $0x1, 0x7(%rax)
je 0xbe484
movq 0x10(%r15), %r15
movb (%r15), %bpl
cmpb $0x1, %bpl
jne 0xbe2a0
movq 0x28(%rsp), %rdi
movq %r15, %rsi
callq 0x7855f
testl %eax, %eax
je 0xbe2a0
jmp 0xbe484
xorl %r13d, %r13d
movb (%r12), %al
cmpb $0x1, %al
jne 0xbe33a
cmpq %r15, %r13
jge 0xbe33a
movq 0x8(%r12), %rsi
movzbl (%rsi), %eax
movq %rbx, %rdi
movq %r14, %rdx
movl %ebp, %ecx
xorl %r8d, %r8d
leaq 0x63068(%rip), %r9      # 0x121380
callq *(%r9,%rax,8)
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq %rbx, %rdi
pushq $0x20
popq %rsi
movq %r14, %rdx
callq *0x8(%rax)
incq %r13
movq 0x10(%r12), %r12
jmp 0xbe2f1
cmpb $0x1, %al
movq 0x30(%rsp), %r15
movl 0x28(%rsp), %ecx
jne 0xbe36e
movq 0x8(%r12), %rsi
movzbl (%rsi), %eax
leaq 0x6302a(%rip), %r9      # 0x121380
cmpl $0x1, %ecx
adcl $0x0, %ecx
movq %rbx, %rdi
movq %r14, %rdx
xorl %r8d, %r8d
callq *(%r9,%rax,8)
movq 0x10(%r12), %r12
cmpq 0x110(%rbx), %r12
je 0xbe43e
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq 0x10(%rax), %rax
cmpq 0x38(%rsp), %r15
jle 0xbe406
leaq 0x247ac(%rip), %rsi     # 0xe2b41
pushq $0x4
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *%rax
jmp 0xbe43e
leaq 0x28229(%rip), %rsi     # 0xe65d5
pushq $0x2
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *%rax
movzbl (%r12), %eax
leaq 0x62f7d(%rip), %rcx     # 0x121340
cmpb $0x1, (%rax,%rcx)
jne 0xbe3ed
cmpl $0x15, %eax
jne 0xbe3d6
testb $0x1, 0x7(%r12)
jne 0xbe3ed
movq %rbx, %rdi
movq %r12, %rsi
movq %r14, %rdx
movl 0x28(%rsp), %ecx
movq %r13, %r8
callq 0x77872
jmp 0xbe43e
movq %rbx, %rdi
movq %r12, %rsi
movq %r14, %rdx
movl 0x28(%rsp), %ecx
movq %r13, %r8
leaq 0x62f7c(%rip), %r9      # 0x121380
jmp 0xbe43a
leaq 0x281c8(%rip), %rsi     # 0xe65d5
pushq $0x2
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *%rax
movzbl (%r12), %eax
leaq 0x62f5c(%rip), %r9      # 0x121380
movl 0x28(%rsp), %ecx
cmpl $0x1, %ecx
adcl $0x0, %ecx
movq %rbx, %rdi
movq %r12, %rsi
movq %r14, %rdx
xorl %r8d, %r8d
callq *(%r9,%rax,8)
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
pushq $0x29
popq %rsi
movq %rbx, %rdi
movq %r14, %rdx
callq *0x8(%rax)
jmp 0xbea94
cmpq 0x110(%rbx), %r15
je 0xbe81e
movzbl %bpl, %eax
cmpb $0x1, (%rax,%r13)
jne 0xbe81e
cmpb $0x15, %bpl
jne 0xbe484
testb $0x1, 0x7(%r15)
jne 0xbe81e
movl $0x3e4c3c, 0xd0(%rsp) # imm = 0x3E4C3C
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x280c9(%rip), %rsi     # 0xe6567
pushq $0xf
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
movq 0x30(%rsp), %rbp
xorl %r15d, %r15d
testq %rbp, %rbp
cmovgq %rbp, %r15
pushq $0x2
popq %r13
movq %r15, 0x48(%rsp)
movq %r12, %rbp
subq $0x1, %r15
jb 0xbe5ab
cmpb $0x1, (%rbp)
jne 0xbe5ab
movq 0x8(%rbp), %rax
movzbl (%rax), %ecx
leaq 0x62e59(%rip), %rdx     # 0x121340
cmpb $0x1, (%rcx,%rdx)
jne 0xbe50a
cmpb $0x15, %cl
sete %cl
movzwl 0x6(%rax), %eax
movl %eax, %edx
shrl $0x8, %edx
andl $0x1, %edx
andb %cl, %dl
testb $0x20, %al
sete %al
orb %dl, %al
je 0xbe56d
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq %rbx, %rdi
pushq $0x20
popq %rsi
movq %r14, %rdx
callq *0x8(%rax)
movq 0x8(%rbp), %rsi
movzbl (%rsi), %eax
leaq 0x62e14(%rip), %rcx     # 0x121340
cmpb $0x1, (%rax,%rcx)
jne 0xbe552
cmpl $0x15, %eax
jne 0xbe53d
testb $0x1, 0x7(%rsi)
jne 0xbe552
movq %rbx, %rdi
movq %r14, %rdx
movl %r13d, %ecx
movq 0x28(%rsp), %r8
callq 0x77872
jmp 0xbe588
movq %rbx, %rdi
movq %r14, %rdx
movl %r13d, %ecx
movq 0x28(%rsp), %r8
leaq 0x62e19(%rip), %r9      # 0x121380
callq *(%r9,%rax,8)
jmp 0xbe588
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq %rbx, %rdi
leaq 0x196db(%rip), %rsi     # 0xd7c5a
pushq $0x3
popq %rdx
movq %r14, %rcx
callq *0x10(%rax)
movq 0x10(%rbp), %rbp
cmpb $0x1, (%rbp)
jne 0xbe4c5
movq 0x28(%rsp), %rdi
movq %rbp, %rsi
callq 0x7855f
testl %eax, %eax
je 0xbe4c5
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
cmpl $0x0, 0x38(%rsp)
je 0xbe5dc
pushq $0x29
popq %rsi
movq %rbx, %rdi
movq %r14, %rdx
callq *0x8(%rax)
movq 0x28(%rsp), %rbp
movq 0x28(%rbp), %rax
cmpq 0x120(%rbx), %rax
cmovneq %rax, %r14
jmp 0xbe5f4
leaq 0x27f94(%rip), %rsi     # 0xe6577
pushq $0x4
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
movq 0x28(%rsp), %rbp
xorl %r13d, %r13d
movq %r12, %r15
cmpq %r13, 0x48(%rsp)
je 0xbe927
cmpb $0x1, (%r15)
jne 0xbe927
movq 0x8(%r15), %rax
movzbl (%rax), %ecx
leaq 0x62d23(%rip), %rdx     # 0x121340
cmpb $0x1, (%rcx,%rdx)
jne 0xbe7a5
cmpb $0x15, %cl
sete %cl
movzwl 0x6(%rax), %eax
movl %eax, %edx
shrl $0x8, %edx
andl $0x1, %edx
andb %cl, %dl
testb $0x20, %al
sete %al
orb %dl, %al
jne 0xbe7a5
testq %r13, %r13
je 0xbe68e
movq %rbx, %rdi
movq %r13, %rsi
callq 0x91f9
andq $0x0, (%rsp)
leaq 0x50(%rsp), %rbp
movq %rbp, %rdi
leaq 0x27f1d(%rip), %rsi     # 0xe6589
leaq 0xd0(%rsp), %rdx
leaq 0x27edb(%rip), %rcx     # 0xe6556
movq %rax, %r8
leaq 0x280d0(%rip), %r9      # 0xe6755
xorl %eax, %eax
callq 0xb3a5
jmp 0xbe6b6
leaq 0x50(%rsp), %rbp
movq %rbp, %rdi
leaq 0x27edf(%rip), %rsi     # 0xe657c
leaq 0xd0(%rsp), %rdx
leaq 0x27eaa(%rip), %rcx     # 0xe6556
xorl %r8d, %r8d
xorl %eax, %eax
callq 0xb3a5
movq 0x8(%r14), %rcx
movq 0x48(%rcx), %r8
movslq %eax, %rdx
movq %rbx, %rdi
movq %rbp, %rsi
movq %r14, %rcx
callq *0x10(%r8)
movq 0x8(%r15), %rbp
movq 0x28(%rsp), %rdi
movq %rbp, %rsi
callq 0x7855f
testl %eax, %eax
je 0xbe734
movl %eax, %esi
negl %esi
cmovsl %eax, %esi
movq %rbx, %rdi
callq 0x91f9
leaq 0x50(%rsp), %rbp
movq %rbp, %rdi
leaq 0x2810a(%rip), %rsi     # 0xe680b
movq %rax, %rdx
leaq 0x283d6(%rip), %rcx     # 0xe6ae1
xorl %r8d, %r8d
xorl %eax, %eax
callq 0xb3a5
movq 0x8(%r14), %rcx
movq 0x48(%rcx), %r8
movslq %eax, %rdx
movq %rbx, %rdi
movq %rbp, %rsi
movq %r14, %rcx
callq *0x10(%r8)
movq 0x28(%rsp), %rbp
jmp 0xbe78a
movzbl (%rbp), %eax
leaq 0x62c01(%rip), %rcx     # 0x121340
cmpb $0x1, (%rax,%rcx)
jne 0xbe76b
cmpl $0x15, %eax
jne 0xbe750
testb $0x1, 0x7(%rbp)
jne 0xbe76b
movq %rbx, %rdi
movq %rbp, %rsi
movq %r14, %rdx
pushq $0x2
popq %rcx
movq 0x28(%rsp), %rbp
movq %rbp, %r8
callq 0x77872
jmp 0xbe78a
movq %rbx, %rdi
movq %rbp, %rsi
movq %r14, %rdx
pushq $0x2
popq %rcx
movq 0x28(%rsp), %rbp
movq %rbp, %r8
leaq 0x62bfa(%rip), %r9      # 0x121380
callq *(%r9,%rax,8)
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
movq %rbx, %rdi
leaq 0x27ddd(%rip), %rsi     # 0xe6579
pushq $0x2
popq %rdx
movq %r14, %rcx
callq *0x10(%rax)
movq 0x10(%r15), %r15
cmpb $0x1, (%r15)
jne 0xbe7be
movq %rbp, %rdi
movq %r15, %rsi
callq 0x7855f
testl %eax, %eax
jne 0xbe7c6
incq %r13
jmp 0xbe5fa
movl %eax, %ebp
negl %ebp
cmovsl %eax, %ebp
cmpl $0x0, 0x38(%rsp)
leaq 0x24d63(%rip), %rax     # 0xe353c
leaq 0x24d5e(%rip), %r15     # 0xe353e
cmoveq %rax, %r15
cmpq $0x1, %r13
je 0xbe868
testq %r13, %r13
jne 0xbe8a6
movl %ebp, %esi
movq %rbx, %rdi
callq 0x91f9
leaq 0x27d54(%rip), %rcx     # 0xe6558
andq $0x0, 0x8(%rsp)
movq %rcx, (%rsp)
leaq 0x27d7e(%rip), %rdx     # 0xe6593
leaq 0x27fee(%rip), %r8      # 0xe680a
jmp 0xbe891
movq %rbx, %rdi
movq %r12, %rsi
movq 0x40(%rsp), %rdx
movq 0x30(%rsp), %rcx
movq %r14, %r8
movq 0x28(%rsp), %r9
jmp 0xbe260
pushq $0x15
popq %rax
leaq 0x62b3b(%rip), %rcx     # 0x121380
movq (%rcx,%rax,8), %rax
pushq $0x1
popq %rcx
movq %rbx, %rdi
movq %r14, %rdx
movq %r13, %r8
addq $0x158, %rsp            # imm = 0x158
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmpq *%rax
movl %ebp, %esi
movq %rbx, %rdi
callq 0x91f9
leaq 0x27cdf(%rip), %rcx     # 0xe6558
andq $0x0, 0x8(%rsp)
movq %rcx, (%rsp)
leaq 0x27d14(%rip), %rdx     # 0xe659e
leaq 0x27cbe(%rip), %r8      # 0xe654f
leaq 0x50(%rsp), %rdi
leaq 0xd0(%rsp), %rcx
movq %r15, %rsi
movq %rax, %r9
jmp 0xbe901
movq %rbx, %rdi
movq %r13, %rsi
callq 0xc2437
movq %rax, %r13
movl %ebp, %esi
movq %rbx, %rdi
callq 0x91f9
leaq 0x27c93(%rip), %rcx     # 0xe6558
movq %rcx, 0x10(%rsp)
movq %rax, 0x8(%rsp)
leaq 0x27c79(%rip), %rax     # 0xe654f
andq $0x0, 0x18(%rsp)
movq %rax, (%rsp)
leaq 0x27cc7(%rip), %rdx     # 0xe65ae
leaq 0x27c68(%rip), %r8      # 0xe6556
leaq 0x50(%rsp), %rdi
leaq 0xd0(%rsp), %rcx
movq %r15, %rsi
movq %r13, %r9
xorl %eax, %eax
callq 0xb3a5
movq 0x8(%r14), %rcx
movq 0x48(%rcx), %r8
movslq %eax, %rdx
leaq 0x50(%rsp), %rsi
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%r8)
movq 0x28(%rsp), %rbp
movq 0x40(%rsp), %rax
testq %rax, %rax
movl 0x38(%rsp), %r15d
jns 0xbea74
jmp 0xbe941
movq 0x10(%r12), %r12
cmpb $0x1, (%r12)
je 0xbe93c
cmpq $-0x2, %rax
je 0xbe979
cmpq $-0x1, %rax
jne 0xbe9ae
testl %r15d, %r15d
leaq 0x24bde(%rip), %rax     # 0xe353c
leaq 0x24bd9(%rip), %rsi     # 0xe353e
cmoveq %rax, %rsi
leaq 0x27c23(%rip), %rdx     # 0xe6593
leaq 0x27bdf(%rip), %r8      # 0xe6556
jmp 0xbe99c
testl %r15d, %r15d
leaq 0x24bb9(%rip), %rax     # 0xe353c
leaq 0x24bb4(%rip), %rsi     # 0xe353e
cmoveq %rax, %rsi
leaq 0x27c09(%rip), %rdx     # 0xe659e
leaq 0x27db9(%rip), %r8      # 0xe6755
leaq 0x50(%rsp), %rdi
leaq 0xd0(%rsp), %rcx
xorl %r9d, %r9d
jmp 0xbe9e9
movq 0x30(%rsp), %rsi
addq $-0x2, %rsi
movq %rbx, %rdi
callq 0x91f9
andq $0x0, (%rsp)
leaq 0x27be3(%rip), %rsi     # 0xe65ae
leaq 0x27b84(%rip), %rcx     # 0xe6556
leaq 0x27d7c(%rip), %r9      # 0xe6755
leaq 0x50(%rsp), %rdi
leaq 0xd0(%rsp), %rdx
movq %rax, %r8
xorl %eax, %eax
callq 0xb3a5
movq 0x8(%r14), %rcx
movq 0x48(%rcx), %r8
movslq %eax, %rdx
leaq 0x50(%rsp), %rsi
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%r8)
movzbl (%r12), %eax
leaq 0x6292a(%rip), %rcx     # 0x121340
cmpb $0x1, (%rax,%rcx)
jne 0xbea3f
cmpl $0x15, %eax
jne 0xbea29
testb $0x1, 0x7(%r12)
jne 0xbea3f
pushq $0x2
popq %rcx
movq %rbx, %rdi
movq %r12, %rsi
movq %r14, %rdx
movq %rbp, %r8
callq 0x77872
jmp 0xbea59
pushq $0x2
popq %rcx
movq %rbx, %rdi
movq %r12, %rsi
movq %r14, %rdx
movq %rbp, %r8
leaq 0x6292b(%rip), %r9      # 0x121380
callq *(%r9,%rax,8)
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x27b11(%rip), %rsi     # 0xe6579
pushq $0x2
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
testl %r15d, %r15d
jne 0xbea94
movq 0x8(%r14), %rax
movq 0x48(%rax), %rax
leaq 0x27b3c(%rip), %rsi     # 0xe65c4
pushq $0x8
popq %rdx
movq %rbx, %rdi
movq %r14, %rcx
callq *0x10(%rax)
addq $-0x20, 0x50(%rbx)
addq $0x158, %rsp            # imm = 0x158
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq