LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_s_opssq
static s7_pointer fx_c_s_opssq(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer largs;
                    largs = caddr(arg);
                    set_car(sc->t2_1, lookup(sc, cadr(largs)));
                    set_car(sc->t2_2, lookup(sc, opt2_sym(cdr(largs))));
                    set_car(sc->t2_2, c_call(largs)(sc, sc->t2_1));
                    set_car(sc->t2_1, lookup(sc, cadr(arg)));
                    return(c_call(arg)(sc, sc->t2_1));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %rax
movq 0x10(%rax), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbb798
jle 0xbb78f
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbb782
cmpq %rsi, %rdi
jne 0xbb862
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x570(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x10(%rax), %rcx
movq 0x20(%rcx), %rcx
movq 0x8(%rbx), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbb7dc
jle 0xbb7d3
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbb7c6
cmpq %rsi, %rdi
jne 0xbb8aa
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x578(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x570(%rbx), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq 0x578(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x10(%r14), %rax
movq 0x8(%rax), %rax
movq 0x8(%rbx), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbb838
jle 0xbb82f
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbb822
cmpq %rdx, %rsi
jne 0xbb8f2
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
movq 0x570(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x20(%r14), %rax
movq 0x570(%rbx), %rsi
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmpq *%rax
cmpb $0x1c, (%rdx)
jne 0xbb896
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbb884
cmpq %rcx, 0x8(%r8)
je 0xbb880
movq 0x18(%r8), %r8
jmp 0xbb86b
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbb7a0
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbb867
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbb79c
xorl %esi, %esi
jmp 0xbb7a0
cmpb $0x1c, (%rdx)
jne 0xbb8de
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbb8cc
cmpq %rcx, 0x8(%r8)
je 0xbb8c8
movq 0x18(%r8), %r8
jmp 0xbb8b3
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbb7e4
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbb8af
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbb7e0
xorl %esi, %esi
jmp 0xbb7e4
cmpb $0x1c, (%rcx)
jne 0xbb926
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbb914
cmpq %rax, 0x8(%rdi)
je 0xbb910
movq 0x18(%rdi), %rdi
jmp 0xbb8fb
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbb840
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbb8f7
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbb83c
xorl %edx, %edx
jmp 0xbb840
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_opssq_s_direct
static s7_pointer fx_c_opssq_s_direct(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer largs;
                    largs = cdadr(arg);
                    return(((s7_p_pp_t)opt2_direct(cdr(arg)))(sc,
                                ((s7_p_pp_t)opt3_direct(cdr(arg)))(sc, lookup(sc, car(largs)), lookup(sc, opt2_sym(largs))),
                                lookup(sc, caddr(arg))));
                }

// Assembly:
pushq %r15
pushq %r14
pushq %rbx
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rcx
movq 0x10(%rcx), %rdi
movq 0x8(%rdi), %r8
movq 0x8(%rbx), %rcx
movq 0x18(%rcx), %rdx
movq 0x20(%r8), %rsi
cmpq %rsi, %rdx
je 0xbb987
movq %rcx, %r9
movq %rdx, %r10
jle 0xbb97e
movq %rcx, %r9
movq 0x10(%r9), %r9
movq 0x18(%r9), %r10
cmpq %r10, %rsi
jl 0xbb971
cmpq %rsi, %r10
jne 0xbba18
movq 0x18(%r8), %rsi
movq 0x10(%rsi), %rsi
movq 0x28(%rax), %r8
movq 0x20(%rdi), %rdi
movq 0x20(%rdi), %r9
cmpq %r9, %rdx
je 0xbb9b8
jle 0xbb9af
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rdx
cmpq %rdx, %r9
jl 0xbb9a2
cmpq %r9, %rdx
jne 0xbba62
movq 0x18(%rdi), %rcx
movq 0x10(%rcx), %rdx
movq 0x20(%rax), %r15
movq %rbx, %rdi
callq *%r8
movq 0x10(%r14), %rcx
movq 0x10(%rcx), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rbx), %rsi
movq 0x18(%rsi), %rdi
movq 0x20(%rcx), %rdx
cmpq %rdx, %rdi
je 0xbb9ff
jle 0xbb9f6
movq 0x10(%rsi), %rsi
movq 0x18(%rsi), %rdi
cmpq %rdi, %rdx
jl 0xbb9e9
cmpq %rdx, %rdi
jne 0xbbaaa
movq 0x18(%rcx), %rcx
movq %r15, %r9
movq 0x10(%rcx), %rdx
movq %rbx, %rdi
movq %rax, %rsi
popq %rbx
popq %r14
popq %r15
jmpq *%r9
cmpb $0x1c, (%r9)
jne 0xbba4e
movq 0x8(%r9), %r11
testq %r11, %r11
sete %r10b
je 0xbba3b
cmpq %r8, 0x8(%r11)
je 0xbba37
movq 0x18(%r11), %r11
jmp 0xbba22
movq 0x10(%r11), %rsi
testb %r10b, %r10b
je 0xbb98f
movq 0x10(%r9), %r9
cmpb $0x1c, (%r9)
je 0xbba1e
movq 0x10(%r8), %rsi
cmpb $0x20, (%rsi)
je 0xbb98b
xorl %esi, %esi
jmp 0xbb98f
cmpb $0x1c, (%rcx)
jne 0xbba96
movq 0x8(%rcx), %r10
testq %r10, %r10
sete %r9b
je 0xbba84
cmpq %rdi, 0x8(%r10)
je 0xbba80
movq 0x18(%r10), %r10
jmp 0xbba6b
movq 0x10(%r10), %rdx
testb %r9b, %r9b
je 0xbb9c0
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbba67
movq 0x10(%rdi), %rcx
cmpb $0x20, (%rcx)
je 0xbb9bc
xorl %edx, %edx
jmp 0xbb9c0
cmpb $0x1c, (%rsi)
movq %r15, %r9
jne 0xbbae1
movq 0x8(%rsi), %r8
testq %r8, %r8
sete %dil
je 0xbbacf
cmpq %rcx, 0x8(%r8)
je 0xbbacb
movq 0x18(%r8), %r8
jmp 0xbbab6
movq 0x10(%r8), %rdx
testb %dil, %dil
je 0xbba0a
movq 0x10(%rsi), %rsi
cmpb $0x1c, (%rsi)
je 0xbbab2
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbba06
xorl %edx, %edx
jmp 0xbba0a
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_opssq_s
static s7_pointer fx_c_opssq_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer largs;
                    largs = cadr(arg);
                    set_car(sc->t2_1, lookup(sc, cadr(largs)));
                    set_car(sc->t2_2, lookup(sc, opt2_sym(cdr(largs))));
                    set_car(sc->t2_1, c_call(largs)(sc, sc->t2_1));
                    set_car(sc->t2_2, lookup(sc, caddr(arg)));
                    return(c_call(arg)(sc, sc->t2_1));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rax
movq 0x10(%rax), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbbb38
jle 0xbbb2f
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbbb22
cmpq %rsi, %rdi
jne 0xbbc06
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x570(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x10(%rax), %rcx
movq 0x20(%rcx), %rcx
movq 0x8(%rbx), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbbb7c
jle 0xbbb73
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbbb66
cmpq %rsi, %rdi
jne 0xbbc4e
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x578(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x570(%rbx), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq 0x570(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x10(%r14), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %rax
movq 0x8(%rbx), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbbbdc
jle 0xbbbd3
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbbbc6
cmpq %rdx, %rsi
jne 0xbbc96
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
movq 0x578(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x20(%r14), %rax
movq 0x570(%rbx), %rsi
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmpq *%rax
cmpb $0x1c, (%rdx)
jne 0xbbc3a
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbbc28
cmpq %rcx, 0x8(%r8)
je 0xbbc24
movq 0x18(%r8), %r8
jmp 0xbbc0f
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbbb40
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbbc0b
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbbb3c
xorl %esi, %esi
jmp 0xbbb40
cmpb $0x1c, (%rdx)
jne 0xbbc82
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbbc70
cmpq %rcx, 0x8(%r8)
je 0xbbc6c
movq 0x18(%r8), %r8
jmp 0xbbc57
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbbb84
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbbc53
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbbb80
xorl %esi, %esi
jmp 0xbbb84
cmpb $0x1c, (%rcx)
jne 0xbbcca
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbbcb8
cmpq %rax, 0x8(%rdi)
je 0xbbcb4
movq 0x18(%rdi), %rdi
jmp 0xbbc9f
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbbbe4
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbbc9b
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbbbe0
xorl %edx, %edx
jmp 0xbbbe4
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_pair_car_s
static s7_pointer fx_is_pair_car_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if (is_pair(p))
                        return(make_boolean(sc, is_pair(car(p))));

                    if (has_active_methods(sc, p))
                    {
                        s7_pointer func;
                        func = find_method(sc, p, sc->car_symbol);
                        if (func != sc->undefined)
                            return(make_boolean(sc, is_pair(s7_apply_function(sc, func, list_1(sc, p)))));
                    }
                    return(wrong_type_argument(sc, sc->car_symbol, 1, p, T_PAIR));
                }

// Assembly:
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc131
jle 0xbc128
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc11b
cmpq %rdx, %rsi
jne 0xbc1fb
movq 0x18(%rax), %rax
movq 0x10(%rax), %r14
cmpb $0x1, (%r14)
jne 0xbc15d
movq 0x8(%r14), %rax
xorl %ecx, %ecx
cmpb $0x1, (%rax)
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
retq
testb $0x40, 0x3(%r14)
je 0xbc24b
cmpb $0x1, 0x24c(%rbx)
jne 0xbc24b
movq 0xd20(%rbx), %rdx
movq %rbx, %rdi
movq %r14, %rsi
callq 0x99ef
movq %rax, %r15
movq 0x128(%rbx), %r12
cmpq %r12, %rax
je 0xbc242
movq 0x90(%rbx), %rax
movq 0x110(%rbx), %r13
cmpq 0x98(%rbx), %rax
ja 0xbc1b9
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rdx
movq $0x200001, (%rdx)       # imm = 0x200001
movq %r14, 0x8(%rdx)
movq %r13, 0x10(%rdx)
movq %rbx, %rdi
movq %r15, %rsi
callq 0xbd41
xorl %ecx, %ecx
cmpb $0x1, (%rax)
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
jmp 0xbc242
cmpb $0x1c, (%rcx)
jne 0xbc22d
movq 0x8(%rcx), %rsi
testq %rsi, %rsi
sete %dl
je 0xbc21c
cmpq %rax, 0x8(%rsi)
je 0xbc218
movq 0x18(%rsi), %rsi
jmp 0xbc204
movq 0x10(%rsi), %r14
testb %dl, %dl
je 0xbc139
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc200
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc135
xorl %r14d, %r14d
jmp 0xbc139
cmpq %r12, %r15
jne 0xbc153
movq 0xd20(%rbx), %rax
movq 0x8(%rax), %rsi
movq 0x926fb(%rip), %rdx     # 0x14e958
movq 0x140(%rbx), %r8
movq 0x967fd(%rip), %r9      # 0x152a68
movq %rbx, %rdi
movq %r14, %rcx
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
jmp 0xb31d
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_pair_cdr_s
static s7_pointer fx_is_pair_cdr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if (is_pair(p))
                        return(make_boolean(sc, is_pair(cdr(p))));
                    return(g_is_pair(sc, set_plist_1(sc, g_cdr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc2b0
jle 0xbc2ab
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc29e
cmpq %rdx, %rsi
jne 0xbc2f4
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc2d3
movq 0x10(%rdx), %rax
xorl %ecx, %ecx
cmpb $0x1, (%rax)
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rcx
movq 0x8(%rcx), %rsi
cmpb $0x1, (%rsi)
jne 0xbc331
movq 0x10(%rsi), %rax
jmp 0xbc346
cmpb $0x1c, (%rcx)
jne 0xbc324
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc316
cmpq %rax, 0x8(%rdi)
je 0xbc312
movq 0x18(%rdi), %rdi
jmp 0xbc2fd
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc2b8
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc2f9
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc2b4
xorl %edx, %edx
jmp 0xbc2b8
movq 0xda0(%rbx), %rdx
movq %rbx, %rdi
movl $0x1, %r8d
callq 0x9b739
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x62f5b
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_pair_cadr_s
static s7_pointer fx_is_pair_cadr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if ((is_pair(p)) && (is_pair(cdr(p))))
                        return(make_boolean(sc, is_pair(cadr(p))));
                    return(g_is_pair(sc, set_plist_1(sc, g_cadr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc392
jle 0xbc38d
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc380
cmpq %rdx, %rsi
jne 0xbc3f3
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc3be
movq 0x10(%rdx), %rax
cmpb $0x1, (%rax)
jne 0xbc3be
movq 0x8(%rax), %rax
xorl %ecx, %ecx
cmpb $0x1, (%rax)
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
callq 0x7a047
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x62f5b
cmpb $0x1c, (%rcx)
jne 0xbc423
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc415
cmpq %rax, 0x8(%rdi)
je 0xbc411
movq 0x18(%rdi), %rdi
jmp 0xbc3fc
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc39a
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc3f8
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc396
xorl %edx, %edx
jmp 0xbc39a
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_pair_cddr_s
static s7_pointer fx_is_pair_cddr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if ((is_pair(p)) && (is_pair(cdr(p))))
                        return(make_boolean(sc, is_pair(cddr(p))));
                    return(g_is_pair(sc, set_plist_1(sc, g_cddr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc468
jle 0xbc463
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc456
cmpq %rdx, %rsi
jne 0xbc4c9
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc494
movq 0x10(%rdx), %rax
cmpb $0x1, (%rax)
jne 0xbc494
movq 0x10(%rax), %rax
xorl %ecx, %ecx
cmpb $0x1, (%rax)
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
callq 0x7a0e7
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x62f5b
cmpb $0x1c, (%rcx)
jne 0xbc4f9
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc4eb
cmpq %rax, 0x8(%rdi)
je 0xbc4e7
movq 0x18(%rdi), %rdi
jmp 0xbc4d2
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc470
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc4ce
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc46c
xorl %edx, %edx
jmp 0xbc470
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_null_cdr_s
static s7_pointer fx_is_null_cdr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if (is_pair(p))
                        return(make_boolean(sc, is_null(cdr(p))));
                    return(g_is_null(sc, set_plist_1(sc, g_cdr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc53e
jle 0xbc539
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc52c
cmpq %rdx, %rsi
jne 0xbc586
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc565
movq 0x10(%rdx), %rax
xorl %ecx, %ecx
cmpq 0x110(%rbx), %rax
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rcx
movq 0x8(%rcx), %rsi
cmpb $0x1, (%rsi)
jne 0xbc5c3
movq 0x10(%rsi), %rax
jmp 0xbc5d8
cmpb $0x1c, (%rcx)
jne 0xbc5b6
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc5a8
cmpq %rax, 0x8(%rdi)
je 0xbc5a4
movq 0x18(%rdi), %rdi
jmp 0xbc58f
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc546
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc58b
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc542
xorl %edx, %edx
jmp 0xbc546
movq 0xda0(%rbx), %rdx
movq %rbx, %rdi
movl $0x1, %r8d
callq 0x9b739
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x63b24
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_null_cadr_s
static s7_pointer fx_is_null_cadr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if ((is_pair(p)) && (is_pair(cdr(p))))
                        return(make_boolean(sc, is_null(cadr(p))));
                    return(g_is_null(sc, set_plist_1(sc, g_cadr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc624
jle 0xbc61f
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc612
cmpq %rdx, %rsi
jne 0xbc689
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc654
movq 0x10(%rdx), %rax
cmpb $0x1, (%rax)
jne 0xbc654
movq 0x8(%rax), %rax
xorl %ecx, %ecx
cmpq 0x110(%rbx), %rax
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
callq 0x7a047
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x63b24
cmpb $0x1c, (%rcx)
jne 0xbc6bd
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc6ab
cmpq %rax, 0x8(%rdi)
je 0xbc6a7
movq 0x18(%rdi), %rdi
jmp 0xbc692
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc62c
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc68e
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc628
xorl %edx, %edx
jmp 0xbc62c
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_null_cddr_s
static s7_pointer fx_is_null_cddr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if ((is_pair(p)) && (is_pair(cdr(p))))
                        return(make_boolean(sc, is_null(cddr(p))));
                    return(g_is_null(sc, set_plist_1(sc, g_cddr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc702
jle 0xbc6fd
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc6f0
cmpq %rdx, %rsi
jne 0xbc767
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc732
movq 0x10(%rdx), %rax
cmpb $0x1, (%rax)
jne 0xbc732
movq 0x10(%rax), %rax
xorl %ecx, %ecx
cmpq 0x110(%rbx), %rax
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
callq 0x7a0e7
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x63b24
cmpb $0x1c, (%rcx)
jne 0xbc79b
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc789
cmpq %rax, 0x8(%rdi)
je 0xbc785
movq 0x18(%rdi), %rdi
jmp 0xbc770
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc70a
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc76c
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc706
xorl %edx, %edx
jmp 0xbc70a
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_symbol_cadr_s
static s7_pointer fx_is_symbol_cadr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p;
                    p = lookup(sc, opt2_sym(cdr(arg)));
                    if ((is_pair(p)) && (is_pair(cdr(p))))
                        return(make_boolean(sc, is_symbol(cadr(p))));
                    return(g_is_symbol(sc, set_plist_1(sc, g_cadr(sc, set_plist_1(sc, p)))));
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbc7e0
jle 0xbc7db
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbc7ce
cmpq %rdx, %rsi
jne 0xbc841
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbc80c
movq 0x10(%rdx), %rax
cmpb $0x1, (%rax)
jne 0xbc80c
movq 0x8(%rax), %rax
xorl %ecx, %ecx
cmpb $0xa, (%rax)
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
popq %rbx
retq
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
callq 0x7a047
movq 0x700(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x700(%rbx), %rsi
movq %rbx, %rdi
popq %rbx
jmp 0x615f1
cmpb $0x1c, (%rcx)
jne 0xbc871
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbc863
cmpq %rax, 0x8(%rdi)
je 0xbc85f
movq 0x18(%rdi), %rdi
jmp 0xbc84a
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbc7e8
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbc846
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbc7e4
xorl %edx, %edx
jmp 0xbc7e8
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_not_opsq
static s7_pointer fx_not_opsq(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer largs;
                    largs = cadr(arg);
                    set_car(sc->t1_1, lookup(sc, cadr(largs)));
                    if (c_call(largs)(sc, sc->t1_1) == sc->F) return(sc->T);
                    return(sc->F);
                }

// Assembly:
pushq %rbx
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rax
movq 0x10(%rax), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbca31
jle 0xbca2c
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbca1f
cmpq %rsi, %rdi
jne 0xbca69
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x568(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x568(%rbx), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq %rax, %rcx
movq 0x120(%rbx), %rax
cmpq %rax, %rcx
jne 0xbca67
movq 0x118(%rbx), %rax
popq %rbx
retq
cmpb $0x1c, (%rdx)
jne 0xbca99
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbca8b
cmpq %rcx, 0x8(%r8)
je 0xbca87
movq 0x18(%r8), %r8
jmp 0xbca72
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbca39
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbca6e
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbca35
xorl %esi, %esi
jmp 0xbca39
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_weak1_type_s
static s7_pointer fx_c_weak1_type_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer val;
                    val = lookup(sc, opt2_sym(cdr(arg)));
                    if (is_c_pointer(val))                /* (let? (c-pointer-weak1 val)) etc */
                        return(make_boolean(sc, (uint8_t)(opt3_byte(cdr(arg))) == type(c_pointer_weak1(val))));

                    if (has_active_methods(sc, val))
                    {
                        s7_pointer func;
                        func = find_method(sc, val, sc->c_pointer_weak1_symbol);
                        if (func != sc->undefined)
                            return(make_boolean(sc, type(s7_apply_function(sc, func, list_1(sc, val))) == (uint8_t)opt3_byte(cdr(arg))));
                    }
                    return(wrong_type_argument(sc, sc->c_pointer_weak1_symbol, 1, val, T_C_POINTER));
                }

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbcae8
jle 0xbcadf
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbcad2
cmpq %rsi, %rdi
jne 0xbcbbf
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %r15
cmpb $0x21, (%r15)
jne 0xbcb1b
movb 0x28(%rax), %al
movq 0x20(%r15), %rcx
xorl %edx, %edx
cmpb (%rcx), %al
setne %dl
movq 0x118(%rbx,%rdx,8), %rax
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
testb $0x40, 0x3(%r15)
je 0xbcc11
cmpb $0x1, 0x24c(%rbx)
jne 0xbcc11
movq 0xc68(%rbx), %rdx
movq %rbx, %rdi
movq %r15, %rsi
callq 0x99ef
movq %rax, %r12
movq 0x128(%rbx), %r13
cmpq %r13, %rax
je 0xbcc08
movq 0x90(%rbx), %rax
movq 0x110(%rbx), %rbp
cmpq 0x98(%rbx), %rax
ja 0xbcb77
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rdx
movq $0x200001, (%rdx)       # imm = 0x200001
movq %r15, 0x8(%rdx)
movq %rbp, 0x10(%rdx)
movq %rbx, %rdi
movq %r12, %rsi
callq 0xbd41
movb (%rax), %al
movq 0x10(%r14), %rcx
xorl %edx, %edx
cmpb 0x28(%rcx), %al
setne %dl
movq 0x118(%rbx,%rdx,8), %rax
jmp 0xbcc08
cmpb $0x1c, (%rdx)
jne 0xbcbf3
movq 0x8(%rdx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbcbe1
cmpq %rcx, 0x8(%rdi)
je 0xbcbdd
movq 0x18(%rdi), %rdi
jmp 0xbcbc8
movq 0x10(%rdi), %r15
testb %sil, %sil
je 0xbcaf0
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbcbc4
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbcaec
xorl %r15d, %r15d
jmp 0xbcaf0
cmpq %r13, %r12
jne 0xbcb0c
movq 0xc68(%rbx), %rax
movq 0x8(%rax), %rsi
movq 0x91d35(%rip), %rdx     # 0x14e958
movq 0x140(%rbx), %r8
movq 0x95f37(%rip), %r9      # 0x152b68
movq %rbx, %rdi
movq %r15, %rcx
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0xb31d
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_is_type_car_s
static s7_pointer fx_is_type_car_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer val;
                    val = lookup(sc, opt2_sym(cdr(arg)));
                    if (is_pair(val))
                        return(make_boolean(sc, (uint8_t)(opt3_byte(cdr(arg))) == type(car(val))));
                    return(make_boolean(sc, (uint8_t)(opt3_byte(cdr(arg))) == type(g_car(sc, set_plist_1(sc, val)))));
                }

// Assembly:
pushq %rbp
pushq %rbx
pushq %rax
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbcc7d
jle 0xbcc78
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbcc6b
cmpq %rsi, %rdi
jne 0xbccaf
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
cmpb $0x1, (%rsi)
movb 0x28(%rax), %bpl
je 0xbcca9
movq 0x700(%rbx), %rax
movq %rsi, 0x8(%rax)
movq 0x700(%rbx), %rcx
movq 0x8(%rcx), %rsi
cmpb $0x1, (%rsi)
jne 0xbccec
movq 0x8(%rsi), %rax
jmp 0xbcd01
cmpb $0x1c, (%rdx)
jne 0xbccdf
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbccd1
cmpq %rcx, 0x8(%r8)
je 0xbcccd
movq 0x18(%r8), %r8
jmp 0xbccb8
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbcc85
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbccb4
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbcc81
xorl %esi, %esi
jmp 0xbcc85
movq 0xd20(%rbx), %rdx
movq %rbx, %rdi
movl $0x1, %r8d
callq 0x9b739
xorl %ecx, %ecx
cmpb (%rax), %bpl
setne %cl
movq 0x118(%rbx,%rcx,8), %rax
addq $0x8, %rsp
popq %rbx
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_car_s
static s7_pointer fx_c_car_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer val;
                    val = lookup(sc, opt2_sym(cdr(arg)));
                    set_car(sc->t1_1, (is_pair(val)) ? car(val) : g_car(sc, set_plist_1(sc, val)));
                    return(c_call(arg)(sc, sc->t1_1));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbce02
jle 0xbcdfd
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbcdf0
cmpq %rdx, %rsi
jne 0xbce36
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbce15
movq 0x8(%rdx), %rax
jmp 0xbce88
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rcx
movq 0x8(%rcx), %rsi
cmpb $0x1, (%rsi)
jne 0xbce73
movq 0x8(%rsi), %rax
jmp 0xbce88
cmpb $0x1c, (%rcx)
jne 0xbce66
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbce58
cmpq %rax, 0x8(%rdi)
je 0xbce54
movq 0x18(%rdi), %rdi
jmp 0xbce3f
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbce0a
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbce3b
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbce06
xorl %edx, %edx
jmp 0xbce0a
movq 0xd20(%rbx), %rdx
movq %rbx, %rdi
movl $0x1, %r8d
callq 0x9b739
movq 0x568(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x20(%r14), %rax
movq 0x568(%rbx), %rsi
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmpq *%rax
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_cdr_s
static s7_pointer fx_c_cdr_s(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer val;
                    val = lookup(sc, opt2_sym(cdr(arg)));
                    set_car(sc->t1_1, (is_pair(val)) ? cdr(val) : g_cdr(sc, set_plist_1(sc, val)));
                    return(c_call(arg)(sc, sc->t1_1));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x20(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbcee1
jle 0xbcedc
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbcecf
cmpq %rdx, %rsi
jne 0xbcf15
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbcef4
movq 0x10(%rdx), %rax
jmp 0xbcf67
movq 0x700(%rbx), %rax
movq %rdx, 0x8(%rax)
movq 0x700(%rbx), %rcx
movq 0x8(%rcx), %rsi
cmpb $0x1, (%rsi)
jne 0xbcf52
movq 0x10(%rsi), %rax
jmp 0xbcf67
cmpb $0x1c, (%rcx)
jne 0xbcf45
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %sil
je 0xbcf37
cmpq %rax, 0x8(%rdi)
je 0xbcf33
movq 0x18(%rdi), %rdi
jmp 0xbcf1e
movq 0x10(%rdi), %rdx
testb %sil, %sil
je 0xbcee9
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbcf1a
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbcee5
xorl %edx, %edx
jmp 0xbcee9
movq 0xda0(%rbx), %rdx
movq %rbx, %rdi
movl $0x1, %r8d
callq 0x9b739
movq 0x568(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x20(%r14), %rax
movq 0x568(%rbx), %rsi
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmpq *%rax
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_c_opsq
static s7_pointer fx_c_opsq(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer largs;
                    largs = cadr(arg);
                    set_car(sc->t1_1, lookup(sc, cadr(largs)));
                    set_car(sc->t1_1, c_call(largs)(sc, sc->t1_1));
                    return(c_call(arg)(sc, sc->t1_1));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rax
movq 0x10(%rax), %rcx
movq 0x8(%rcx), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbcfc8
jle 0xbcfc3
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbcfb6
cmpq %rsi, %rdi
jne 0xbd00a
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x568(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x568(%rbx), %rsi
movq %rbx, %rdi
callq *0x20(%rax)
movq 0x568(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x20(%r14), %rax
movq 0x568(%rbx), %rsi
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmpq *%rax
cmpb $0x1c, (%rdx)
jne 0xbd03a
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbd02c
cmpq %rcx, 0x8(%r8)
je 0xbd028
movq 0x18(%r8), %r8
jmp 0xbd013
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbcfd0
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbd00f
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbcfcc
xorl %esi, %esi
jmp 0xbcfd0
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_add_s1
static s7_pointer fx_add_s1(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer x;
                    x = lookup(sc, cadr(arg));
                    if (is_t_integer(x))
                        return(make_integer(sc, integer(x) + 1));
                    return(g_add_x1_1(sc, x, cdr(arg))); /* arg=(+ x 1) */
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
movq 0x10(%rsi), %rdx
movq 0x8(%rdx), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rdi
movq 0x20(%rax), %rsi
cmpq %rsi, %rdi
je 0xbd0ff
jle 0xbd0fa
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rdi
cmpq %rdi, %rsi
jl 0xbd0ed
cmpq %rsi, %rdi
jne 0xbd13d
movq 0x18(%rax), %rax
movq 0x10(%rax), %rsi
cmpb $0xb, (%rsi)
jne 0xbd12e
movq 0x8(%rsi), %rax
leaq 0x1(%rax), %r14
cmpq $0x7ff, %r14            # imm = 0x7FF
ja 0xbd17a
leaq 0x9182c(%rip), %rcx     # 0x14e950
movq 0x8(%rcx,%rax,8), %rax
jmp 0xbd1b3
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0xc1b57
cmpb $0x1c, (%rcx)
jne 0xbd16d
movq 0x8(%rcx), %r8
testq %r8, %r8
sete %dil
je 0xbd15f
cmpq %rax, 0x8(%r8)
je 0xbd15b
movq 0x18(%r8), %r8
jmp 0xbd146
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbd107
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbd142
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbd103
xorl %esi, %esi
jmp 0xbd107
movq 0x90(%rbx), %rax
cmpq 0x98(%rbx), %rax
ja 0xbd192
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rax
movq $0xb, (%rax)
movq %r14, 0x8(%rax)
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_add_si
static s7_pointer fx_add_si(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer x;
                    x = lookup(sc, cadr(arg));
                    if (is_t_integer(x))
                        return(make_integer(sc, integer(x) + integer(opt2_con(cdr(arg)))));
                    return(add_p_pp(sc, x, caddr(arg)));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbd1ef
jle 0xbd1ea
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbd1dd
cmpq %rsi, %rdi
jne 0xbd238
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
cmpb $0xb, (%rsi)
jne 0xbd221
movq 0x20(%rax), %rax
movq 0x8(%rax), %r14
addq 0x8(%rsi), %r14
cmpq $0x7ff, %r14            # imm = 0x7FF
ja 0xbd275
leaq 0x91738(%rip), %rax     # 0x14e950
movq (%rax,%r14,8), %rax
jmp 0xbd2ae
movq 0x10(%rax), %rax
movq 0x8(%rax), %rdx
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0x8d0a7
cmpb $0x1c, (%rdx)
jne 0xbd268
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbd25a
cmpq %rcx, 0x8(%r8)
je 0xbd256
movq 0x18(%r8), %r8
jmp 0xbd241
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbd1f7
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbd23d
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbd1f3
xorl %esi, %esi
jmp 0xbd1f7
movq 0x90(%rbx), %rax
cmpq 0x98(%rbx), %rax
ja 0xbd28d
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rax
movq $0xb, (%rax)
movq %r14, 0x8(%rax)
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_subtract_sf
static s7_pointer fx_subtract_sf(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer x;
                    x = lookup(sc, cadr(arg));
                    if (is_t_real(x)) return(make_real(sc, real(x) - real(caddr(arg))));
                    return(g_subtract_2f(sc, set_plist_2(sc, x, caddr(arg))));
                }

// Assembly:
pushq %rbx
subq $0x10, %rsp
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbd2ef
jle 0xbd2e6
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbd2d9
cmpq %rsi, %rdi
jne 0xbd38c
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
cmpb $0xd, (%rsi)
jne 0xbd35a
movsd 0x8(%rsi), %xmm0
movq 0x10(%rax), %rax
movq 0x8(%rax), %rax
subsd 0x8(%rax), %xmm0
movq 0x90(%rbx), %rax
cmpq 0x98(%rbx), %rax
ja 0xbd332
movq %rbx, %rdi
movsd %xmm0, 0x8(%rsp)
callq 0xb389
movsd 0x8(%rsp), %xmm0
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rax
movq $0xd, (%rax)
movsd %xmm0, 0x8(%rax)
addq $0x10, %rsp
popq %rbx
retq
movq 0x10(%rax), %rax
movq 0x8(%rax), %rax
movq 0x708(%rbx), %rcx
movq %rsi, 0x8(%rcx)
movq 0x710(%rbx), %rcx
movq %rax, 0x8(%rcx)
movq 0x708(%rbx), %rsi
movq %rbx, %rdi
addq $0x10, %rsp
popq %rbx
jmp 0xc1df8
cmpb $0x1c, (%rdx)
jne 0xbd3c0
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbd3ae
cmpq %rcx, 0x8(%r8)
je 0xbd3aa
movq 0x18(%r8), %r8
jmp 0xbd395
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbd2f7
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbd391
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbd2f3
xorl %esi, %esi
jmp 0xbd2f7
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_subtract_s1
static s7_pointer fx_subtract_s1(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer x;
                    x = lookup(sc, cadr(arg));
                    if (is_t_integer(x))
                        return(make_integer(sc, integer(x) - 1));
                    return(minus_c1(sc, x));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %rsi
movq 0x20(%rax), %rdx
cmpq %rdx, %rsi
je 0xbd408
jle 0xbd403
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %rsi
cmpq %rsi, %rdx
jl 0xbd3f6
cmpq %rdx, %rsi
jne 0xbd446
movq 0x18(%rax), %rax
movq 0x10(%rax), %rsi
cmpb $0xb, (%rsi)
jne 0xbd437
movq 0x8(%rsi), %rax
leaq -0x1(%rax), %r14
cmpq $0x7ff, %r14            # imm = 0x7FF
ja 0xbd481
leaq 0x91523(%rip), %rcx     # 0x14e950
movq -0x8(%rcx,%rax,8), %rax
jmp 0xbd4ba
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0xc1efe
cmpb $0x1c, (%rcx)
jne 0xbd474
movq 0x8(%rcx), %rdi
testq %rdi, %rdi
sete %dl
je 0xbd467
cmpq %rax, 0x8(%rdi)
je 0xbd463
movq 0x18(%rdi), %rdi
jmp 0xbd44f
movq 0x10(%rdi), %rsi
testb %dl, %dl
je 0xbd410
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbd44b
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbd40c
xorl %esi, %esi
jmp 0xbd410
movq 0x90(%rbx), %rax
cmpq 0x98(%rbx), %rax
ja 0xbd499
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rax
movq $0xb, (%rax)
movq %r14, 0x8(%rax)
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_subtract_si
static s7_pointer fx_subtract_si(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer x;
                    x = lookup(sc, cadr(arg));
                    if (is_t_integer(x))
                        return(make_integer(sc, integer(x) - integer(opt2_con(cdr(arg)))));
                    return(subtract_p_pp(sc, x, caddr(arg)));
                }

// Assembly:
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %rdi
movq 0x20(%rcx), %rsi
cmpq %rsi, %rdi
je 0xbd4f6
jle 0xbd4f1
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %rdi
cmpq %rdi, %rsi
jl 0xbd4e4
cmpq %rsi, %rdi
jne 0xbd53f
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
cmpb $0xb, (%rsi)
jne 0xbd528
movq 0x8(%rsi), %r14
movq 0x20(%rax), %rax
subq 0x8(%rax), %r14
cmpq $0x7ff, %r14            # imm = 0x7FF
ja 0xbd57c
leaq 0x91431(%rip), %rax     # 0x14e950
movq (%rax,%r14,8), %rax
jmp 0xbd5b5
movq 0x10(%rax), %rax
movq 0x8(%rax), %rdx
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
jmp 0x8d4de
cmpb $0x1c, (%rdx)
jne 0xbd56f
movq 0x8(%rdx), %r8
testq %r8, %r8
sete %dil
je 0xbd561
cmpq %rcx, 0x8(%r8)
je 0xbd55d
movq 0x18(%r8), %r8
jmp 0xbd548
movq 0x10(%r8), %rsi
testb %dil, %dil
je 0xbd4fe
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbd544
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbd4fa
xorl %esi, %esi
jmp 0xbd4fe
movq 0x90(%rbx), %rax
cmpq 0x98(%rbx), %rax
ja 0xbd594
movq %rbx, %rdi
callq 0xb389
movq 0x90(%rbx), %rax
leaq -0x8(%rax), %rcx
movq %rcx, 0x90(%rbx)
movq -0x8(%rax), %rax
movq $0xb, (%rax)
movq %r14, 0x8(%rax)
addq $0x8, %rsp
popq %rbx
popq %r14
retq
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_num_eq_si
static s7_pointer fx_num_eq_si(s7_scheme *sc, s7_pointer arg)
                {
                    s7_int y;
                    s7_pointer val, args;
                    args = cdr(arg);
                    val = lookup(sc, car(args));
                    y = integer(cadr(args));
                    if (is_t_integer(val))
                        return(make_boolean(sc, integer(val) == y));
                    return(fx_num_eq_xi_1(sc, args, val, y));
                }

// Assembly:
movq 0x10(%rsi), %rsi
movq 0x8(%rsi), %rax
movq 0x8(%rdi), %rcx
movq 0x18(%rcx), %r8
movq 0x20(%rax), %rdx
cmpq %rdx, %r8
je 0xbd6f1
jle 0xbd6ec
movq 0x10(%rcx), %rcx
movq 0x18(%rcx), %r8
cmpq %r8, %rdx
jl 0xbd6df
cmpq %rdx, %r8
jne 0xbd720
movq 0x18(%rax), %rax
movq 0x10(%rax), %rdx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rax
movq 0x8(%rax), %rcx
cmpb $0xb, (%rdx)
jne 0xc23be
xorl %eax, %eax
cmpq %rcx, 0x8(%rdx)
setne %al
movq 0x118(%rdi,%rax,8), %rax
retq
cmpb $0x1c, (%rcx)
jne 0xbd750
movq 0x8(%rcx), %r9
testq %r9, %r9
sete %r8b
je 0xbd742
cmpq %rax, 0x8(%r9)
je 0xbd73e
movq 0x18(%r9), %r9
jmp 0xbd729
movq 0x10(%r9), %rdx
testb %r8b, %r8b
je 0xbd6f9
movq 0x10(%rcx), %rcx
cmpb $0x1c, (%rcx)
je 0xbd725
movq 0x10(%rax), %rax
cmpb $0x20, (%rax)
je 0xbd6f5
xorl %edx, %edx
jmp 0xbd6f9
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: g_memq_2
static s7_pointer g_memq_2(s7_scheme *sc, s7_pointer args)
                {
                    s7_pointer x, obj;
                    x = cadr(args);
                    obj = car(args);
                    if (obj == car(x)) return(x);
                    if (obj == cadr(x)) return(cdr(x));
                    return(sc->F);
                }

// Assembly:
movq 0x8(%rsi), %rcx
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rax
cmpq 0x8(%rax), %rcx
je 0xbd780
movq 0x10(%rax), %rax
cmpq 0x8(%rax), %rcx
je 0xbd780
movq 0x120(%rdi), %rax
retq
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_memq_sq_2
static s7_pointer fx_memq_sq_2(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer p, obj;
                    obj = lookup(sc, cadr(arg));
                    p = opt2_con(cdr(arg));
                    if (obj == car(p)) return(p);
                    if (obj == cadr(p)) return(cdr(p));
                    return(sc->F);
                }

// Assembly:
movq 0x10(%rsi), %rax
movq 0x8(%rax), %rcx
movq 0x8(%rdi), %rdx
movq 0x18(%rdx), %r8
movq 0x20(%rcx), %rsi
cmpq %rsi, %r8
je 0xbd7ae
jle 0xbd7a9
movq 0x10(%rdx), %rdx
movq 0x18(%rdx), %r8
cmpq %r8, %rsi
jl 0xbd79c
cmpq %rsi, %r8
jne 0xbd7d2
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x20(%rax), %rax
cmpq 0x8(%rax), %rsi
je 0xbd7d1
movq 0x10(%rax), %rax
cmpq 0x8(%rax), %rsi
je 0xbd7d1
movq 0x120(%rdi), %rax
retq
cmpb $0x1c, (%rdx)
jne 0xbd802
movq 0x8(%rdx), %r9
testq %r9, %r9
sete %r8b
je 0xbd7f4
cmpq %rcx, 0x8(%r9)
je 0xbd7f0
movq 0x18(%r9), %r9
jmp 0xbd7db
movq 0x10(%r9), %rsi
testb %r8b, %r8b
je 0xbd7b6
movq 0x10(%rdx), %rdx
cmpb $0x1c, (%rdx)
je 0xbd7d7
movq 0x10(%rcx), %rcx
cmpb $0x20, (%rcx)
je 0xbd7b2
xorl %esi, %esi
jmp 0xbd7b6
// File: /workspace/github_c_makefile_star2_O1/BernardTatin[P]s7sh/s7.c
// Function: fx_hash_table_ref_car
static s7_pointer fx_hash_table_ref_car(s7_scheme *sc, s7_pointer arg)
                {
                    s7_pointer table, lst;
                    table = lookup(sc, cadr(arg));
                    lst = lookup(sc, opt2_sym(cdr(arg)));
                    if (!is_pair(lst))
                        return(simple_wrong_type_argument(sc, sc->car_symbol, lst, T_PAIR));
                    if (!is_hash_table(table))
                        return(g_hash_table_ref(sc, set_plist_2(sc, table, car(lst))));
                    return(hash_entry_value((*hash_table_checker(table))(sc, table, car(lst))));
                }

// Assembly:
pushq %rax
movq 0x10(%rsi), %rdx
movq 0x8(%rdx), %r8
movq 0x8(%rdi), %rax
movq 0x18(%rax), %rcx
movq 0x20(%r8), %rsi
cmpq %rsi, %rcx
je 0xbdd9d
movq %rax, %r9
movq %rcx, %r10
jle 0xbdd98
movq %rax, %r9
movq 0x10(%r9), %r9
movq 0x18(%r9), %r10
cmpq %r10, %rsi
jl 0xbdd8b
cmpq %rsi, %r10
jne 0xbde0c
movq 0x18(%r8), %rsi
movq 0x10(%rsi), %rsi
movq 0x20(%rdx), %r8
movq 0x20(%r8), %rdx
cmpq %rdx, %rcx
je 0xbddca
jle 0xbddc1
movq 0x10(%rax), %rax
movq 0x18(%rax), %rcx
cmpq %rcx, %rdx
jl 0xbddb4
cmpq %rdx, %rcx
jne 0xbde56
movq 0x18(%r8), %rax
movq 0x10(%rax), %rdx
cmpb $0x1, (%rdx)
jne 0xbdded
cmpb $0x1b, (%rsi)
jne 0xbde9c
movq 0x8(%rdx), %rdx
callq *0x18(%rsi)
movq 0x20(%rax), %rax
popq %rcx
retq
movq 0xd20(%rdi), %rax
movq 0x8(%rax), %rsi
movq 0x140(%rdi), %rcx
movq 0x94c62(%rip), %r8      # 0x152a68
popq %rax
jmp 0xfac8
cmpb $0x1c, (%r9)
jne 0xbde42
movq 0x8(%r9), %r11
testq %r11, %r11
sete %r10b
je 0xbde2f
cmpq %r8, 0x8(%r11)
je 0xbde2b
movq 0x18(%r11), %r11
jmp 0xbde16
movq 0x10(%r11), %rsi
testb %r10b, %r10b
je 0xbdda5
movq 0x10(%r9), %r9
cmpb $0x1c, (%r9)
je 0xbde12
movq 0x10(%r8), %rsi
cmpb $0x20, (%rsi)
je 0xbdda1
xorl %esi, %esi
jmp 0xbdda5
cmpb $0x1c, (%rax)
jne 0xbde88
movq 0x8(%rax), %r9
testq %r9, %r9
sete %cl
je 0xbde77
cmpq %r8, 0x8(%r9)
je 0xbde73
movq 0x18(%r9), %r9
jmp 0xbde5f
movq 0x10(%r9), %rdx
testb %cl, %cl
je 0xbddd2
movq 0x10(%rax), %rax
cmpb $0x1c, (%rax)
je 0xbde5b
movq 0x10(%r8), %rax
cmpb $0x20, (%rax)
je 0xbddce
xorl %edx, %edx
jmp 0xbddd2
movq 0x8(%rdx), %rax
movq 0x708(%rdi), %rcx
movq %rsi, 0x8(%rcx)
movq 0x710(%rdi), %rcx
movq %rax, 0x8(%rcx)
movq 0x708(%rdi), %rsi
popq %rax
jmp 0x82103