LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: check_quote
static inline s7_pointer check_quote(s7_scheme *sc, s7_pointer code)
                {
                    if (!is_pair(cdr(code)))                    /* (quote . -1) */
                    {
                        if (is_null(cdr(code)))
                            eval_error(sc, "quote: not enough arguments: ~A", 31, code);
                        eval_error(sc, "quote: stray dot?: ~A", 21, code);
                    }
                    if (is_not_null(cddr(code)))             /* (quote . (1 2)) or (quote 1 1) */
                        eval_error(sc, "quote: too many arguments ~A", 28, code);
                    return(cadr(code));

                    /* I think a quoted list in another list can be applied to a function, come here and
                     *   be changed to unchecked, set-cdr! or something clobbers the argument so we get
                     *   here on the next time around with the equivalent of (quote . 0) if unchecked
                     * so set-cdr! of constant -- if marked immutable, we could catch this case and clear.
                     */
                }

// Assembly:
subq $0x68, %rsp
movq %rdi, 0x58(%rsp)
movq %rsi, 0x50(%rsp)
movq 0x50(%rsp), %rax
movq 0x10(%rax), %rax
movzbl (%rax), %eax
cmpl $0x1, %eax
je 0x10ef7c
movq 0x50(%rsp), %rax
movq 0x10(%rax), %rax
movq 0x58(%rsp), %rcx
cmpq 0x110(%rcx), %rax
jne 0x10ef13
movq 0x58(%rsp), %rax
movq %rax, 0x40(%rsp)
movq 0x58(%rsp), %rax
movq 0x1918(%rax), %rax
movq %rax, 0x48(%rsp)
movq 0x58(%rsp), %rax
movq %rax, 0x38(%rsp)
movq 0x58(%rsp), %rdi
leaq 0xe06ab(%rip), %rsi     # 0x1ef586
movl $0x1f, %edx
callq 0xb880
movq 0x38(%rsp), %rdi
movq %rax, %rsi
movq 0x50(%rsp), %rdx
callq 0xb830
movq 0x40(%rsp), %rdi
movq 0x48(%rsp), %rsi
movq %rax, %rdx
callq 0x2f940
movq %rax, 0x60(%rsp)
jmp 0x10f00f
movq 0x58(%rsp), %rax
movq %rax, 0x28(%rsp)
movq 0x58(%rsp), %rax
movq 0x1918(%rax), %rax
movq %rax, 0x30(%rsp)
movq 0x58(%rsp), %rax
movq %rax, 0x20(%rsp)
movq 0x58(%rsp), %rdi
leaq 0xe0662(%rip), %rsi     # 0x1ef5a6
movl $0x15, %edx
callq 0xb880
movq 0x20(%rsp), %rdi
movq %rax, %rsi
movq 0x50(%rsp), %rdx
callq 0xb830
movq 0x28(%rsp), %rdi
movq 0x30(%rsp), %rsi
movq %rax, %rdx
callq 0x2f940
movq %rax, 0x60(%rsp)
jmp 0x10f00f
movq 0x50(%rsp), %rax
movq 0x10(%rax), %rax
movq 0x10(%rax), %rax
movq 0x58(%rsp), %rcx
cmpq 0x110(%rcx), %rax
je 0x10effd
movq 0x58(%rsp), %rax
movq %rax, 0x10(%rsp)
movq 0x58(%rsp), %rax
movq 0x1918(%rax), %rax
movq %rax, 0x18(%rsp)
movq 0x58(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x58(%rsp), %rdi
leaq 0xe05f4(%rip), %rsi     # 0x1ef5bc
movl $0x1c, %edx
callq 0xb880
movq 0x8(%rsp), %rdi
movq %rax, %rsi
movq 0x50(%rsp), %rdx
callq 0xb830
movq 0x10(%rsp), %rdi
movq 0x18(%rsp), %rsi
movq %rax, %rdx
callq 0x2f940
movq %rax, 0x60(%rsp)
jmp 0x10f00f
movq 0x50(%rsp), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %rax
movq %rax, 0x60(%rsp)
movq 0x60(%rsp), %rax
addq $0x68, %rsp
retq
nopl (%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: gt_out_y
static bool gt_out_y(s7_scheme *sc, s7_pointer x, s7_pointer y)
    {
        if (has_active_methods(sc, y))
            return(find_and_apply_method(sc, find_let(sc, y), sc->gt_symbol, list_2(sc, x, y)) != sc->F);
        wrong_type_argument(sc, sc->gt_symbol, 2, y, T_REAL);
        return(false);
    }

// Assembly:
subq $0xa8, %rsp
movq %rdi, 0x98(%rsp)
movq %rsi, 0x90(%rsp)
movq %rdx, 0x88(%rsp)
movq 0x88(%rsp), %rax
movq (%rax), %rax
andq $0x40000000, %rax       # imm = 0x40000000
cmpq $0x0, %rax
je 0x10f224
movq 0x98(%rsp), %rax
testb $0x1, 0x24c(%rax)
je 0x10f224
movq 0x98(%rsp), %rax
movq %rax, 0x20(%rsp)
movq 0x98(%rsp), %rdi
movq 0x88(%rsp), %rsi
callq 0x9a10
movq %rax, 0x28(%rsp)
movq 0x98(%rsp), %rax
movq 0xf58(%rax), %rax
movq %rax, 0x30(%rsp)
movq 0x98(%rsp), %rax
movq %rax, 0x38(%rsp)
movq 0x90(%rsp), %rax
movq %rax, 0x40(%rsp)
movq 0x88(%rsp), %rax
movq %rax, 0x78(%rsp)
movq 0x98(%rsp), %rax
movq 0x110(%rax), %rax
movq %rax, 0x70(%rsp)
movq 0x98(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x98(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x10f172
movq 0x98(%rsp), %rdi
callq 0xc670
movq 0x98(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x80(%rsp)
movq 0x80(%rsp), %rax
movq $0x200001, (%rax)       # imm = 0x200001
movq 0x40(%rsp), %rsi
movq 0x38(%rsp), %rdi
movq 0x78(%rsp), %rcx
movq 0x80(%rsp), %rax
movq %rcx, 0x8(%rax)
movq 0x70(%rsp), %rcx
movq 0x80(%rsp), %rax
movq %rcx, 0x10(%rax)
movq 0x80(%rsp), %rax
movq %rax, 0x68(%rsp)
movq 0x68(%rsp), %rdx
callq 0xd9f0
movq 0x20(%rsp), %rdi
movq 0x28(%rsp), %rsi
movq 0x30(%rsp), %rdx
movq %rax, %rcx
callq 0xc84f0
movq 0x98(%rsp), %rcx
cmpq 0x120(%rcx), %rax
setne %al
andb $0x1, %al
movb %al, 0xa7(%rsp)
jmp 0x10f344
movq 0x98(%rsp), %rax
movq %rax, 0x10(%rsp)
movq 0x98(%rsp), %rax
movq 0xf58(%rax), %rax
movq 0x8(%rax), %rax
movq %rax, 0x18(%rsp)
movq $0x2, 0x60(%rsp)
movq 0x60(%rsp), %rax
andq $-0x800, %rax           # imm = 0xF800
cmpq $0x0, %rax
jne 0x10f27d
movq 0x60(%rsp), %rcx
leaq 0x107211(%rip), %rax    # 0x216480
movq (%rax,%rcx,8), %rax
movq %rax, 0x8(%rsp)
jmp 0x10f300
jmp 0x10f27f
movq 0x98(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x98(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x10f2ac
movq 0x98(%rsp), %rdi
callq 0xc670
movq 0x98(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x50(%rsp)
movq 0x50(%rsp), %rax
movq $0xb, (%rax)
movq 0x60(%rsp), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x8(%rax)
movq 0x50(%rsp), %rax
movq %rax, 0x48(%rsp)
movq 0x48(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x18(%rsp), %rsi
movq 0x10(%rsp), %rdi
movq 0x8(%rsp), %rax
movq %rax, 0x58(%rsp)
movq 0x58(%rsp), %rdx
movq 0x88(%rsp), %rcx
movq 0x98(%rsp), %rax
movq 0x140(%rax), %r8
movq 0x10b2c1(%rip), %r9     # 0x21a5f8
callq 0xc560
movb $0x0, 0xa7(%rsp)
movb 0xa7(%rsp), %al
andb $0x1, %al
addq $0xa8, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: gt_out_x
static bool gt_out_x(s7_scheme *sc, s7_pointer x, s7_pointer y)
    {
        if (has_active_methods(sc, x))
            return(find_and_apply_method(sc, find_let(sc, x), sc->gt_symbol, list_2(sc, x, y)) != sc->F);
        wrong_type_argument(sc, sc->gt_symbol, 1, x, T_REAL);
        return(false);
    }

// Assembly:
subq $0xa8, %rsp
movq %rdi, 0x98(%rsp)
movq %rsi, 0x90(%rsp)
movq %rdx, 0x88(%rsp)
movq 0x90(%rsp), %rax
movq (%rax), %rax
andq $0x40000000, %rax       # imm = 0x40000000
cmpq $0x0, %rax
je 0x10f504
movq 0x98(%rsp), %rax
testb $0x1, 0x24c(%rax)
je 0x10f504
movq 0x98(%rsp), %rax
movq %rax, 0x20(%rsp)
movq 0x98(%rsp), %rdi
movq 0x90(%rsp), %rsi
callq 0x9a10
movq %rax, 0x28(%rsp)
movq 0x98(%rsp), %rax
movq 0xf58(%rax), %rax
movq %rax, 0x30(%rsp)
movq 0x98(%rsp), %rax
movq %rax, 0x38(%rsp)
movq 0x90(%rsp), %rax
movq %rax, 0x40(%rsp)
movq 0x88(%rsp), %rax
movq %rax, 0x78(%rsp)
movq 0x98(%rsp), %rax
movq 0x110(%rax), %rax
movq %rax, 0x70(%rsp)
movq 0x98(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x98(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x10f452
movq 0x98(%rsp), %rdi
callq 0xc670
movq 0x98(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x80(%rsp)
movq 0x80(%rsp), %rax
movq $0x200001, (%rax)       # imm = 0x200001
movq 0x40(%rsp), %rsi
movq 0x38(%rsp), %rdi
movq 0x78(%rsp), %rcx
movq 0x80(%rsp), %rax
movq %rcx, 0x8(%rax)
movq 0x70(%rsp), %rcx
movq 0x80(%rsp), %rax
movq %rcx, 0x10(%rax)
movq 0x80(%rsp), %rax
movq %rax, 0x68(%rsp)
movq 0x68(%rsp), %rdx
callq 0xd9f0
movq 0x20(%rsp), %rdi
movq 0x28(%rsp), %rsi
movq 0x30(%rsp), %rdx
movq %rax, %rcx
callq 0xc84f0
movq 0x98(%rsp), %rcx
cmpq 0x120(%rcx), %rax
setne %al
andb $0x1, %al
movb %al, 0xa7(%rsp)
jmp 0x10f624
movq 0x98(%rsp), %rax
movq %rax, 0x10(%rsp)
movq 0x98(%rsp), %rax
movq 0xf58(%rax), %rax
movq 0x8(%rax), %rax
movq %rax, 0x18(%rsp)
movq $0x1, 0x60(%rsp)
movq 0x60(%rsp), %rax
andq $-0x800, %rax           # imm = 0xF800
cmpq $0x0, %rax
jne 0x10f55d
movq 0x60(%rsp), %rcx
leaq 0x106f31(%rip), %rax    # 0x216480
movq (%rax,%rcx,8), %rax
movq %rax, 0x8(%rsp)
jmp 0x10f5e0
jmp 0x10f55f
movq 0x98(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x98(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x10f58c
movq 0x98(%rsp), %rdi
callq 0xc670
movq 0x98(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x50(%rsp)
movq 0x50(%rsp), %rax
movq $0xb, (%rax)
movq 0x60(%rsp), %rcx
movq 0x50(%rsp), %rax
movq %rcx, 0x8(%rax)
movq 0x50(%rsp), %rax
movq %rax, 0x48(%rsp)
movq 0x48(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x18(%rsp), %rsi
movq 0x10(%rsp), %rdi
movq 0x8(%rsp), %rax
movq %rax, 0x58(%rsp)
movq 0x58(%rsp), %rdx
movq 0x90(%rsp), %rcx
movq 0x98(%rsp), %rax
movq 0x140(%rax), %r8
movq 0x10afe1(%rip), %r9     # 0x21a5f8
callq 0xc560
movb $0x0, 0xa7(%rsp)
movb 0xa7(%rsp), %al
andb $0x1, %al
addq $0xa8, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: add_ratios_1
static s7_pointer add_ratios_1(s7_scheme *sc, s7_int n1, s7_int d1, s7_int n2, s7_int d2)
    {
        if (d1 == d2)                                     /* the easy case -- if overflow here, it matches the int case */
            return(s7_make_ratio(sc, n1 + n2, d1));

#if HAVE_OVERFLOW_CHECKS
        {
            s7_int n1d2, n2d1, d1d2, dn;
            if ((multiply_overflow(d1, d2, &d1d2)) ||
                    (multiply_overflow(n1, d2, &n1d2)) ||
                    (multiply_overflow(n2, d1, &n2d1)) ||
                    (add_overflow(n1d2, n2d1, &dn)))
                return(make_real(sc, ((long_double)n1 / (long_double)d1) + ((long_double)n2 / (long_double)d2)));
            return(s7_make_ratio(sc, dn, d1d2));
        }
#else
        return(s7_make_ratio(sc, n1 * d2 + n2 * d1, d1 * d2));
#endif
    }

// Assembly:
subq $0x98, %rsp
movq %rdi, 0x88(%rsp)
movq %rsi, 0x80(%rsp)
movq %rdx, 0x78(%rsp)
movq %rcx, 0x70(%rsp)
movq %r8, 0x68(%rsp)
movq 0x78(%rsp), %rax
cmpq 0x68(%rsp), %rax
jne 0x110c5e
movq 0x88(%rsp), %rdi
movq 0x80(%rsp), %rsi
addq 0x70(%rsp), %rsi
movq 0x78(%rsp), %rdx
callq 0x11a80
movq %rax, 0x90(%rsp)
jmp 0x110db9
movq 0x78(%rsp), %rcx
imulq 0x68(%rsp), %rcx
seto %al
movq %rcx, 0x50(%rsp)
testb $0x1, %al
jne 0x110cc1
movq 0x80(%rsp), %rcx
imulq 0x68(%rsp), %rcx
seto %al
movq %rcx, 0x60(%rsp)
testb $0x1, %al
jne 0x110cc1
movq 0x70(%rsp), %rcx
imulq 0x78(%rsp), %rcx
seto %al
movq %rcx, 0x58(%rsp)
testb $0x1, %al
jne 0x110cc1
movq 0x60(%rsp), %rcx
addq 0x58(%rsp), %rcx
seto %al
movq %rcx, 0x48(%rsp)
testb $0x1, %al
jne 0x110cc1
jmp 0x110d9a
movq 0x80(%rsp), %rax
movq %rax, 0x10(%rsp)
fildll 0x10(%rsp)
movq 0x78(%rsp), %rax
movq %rax, 0x18(%rsp)
fildll 0x18(%rsp)
fdivrp %st, %st(1)
movq 0x70(%rsp), %rax
movq %rax, 0x20(%rsp)
fildll 0x20(%rsp)
movq 0x68(%rsp), %rax
movq %rax, 0x28(%rsp)
fildll 0x28(%rsp)
fdivrp %st, %st(1)
faddp %st, %st(1)
fstpl 0x8(%rsp)
movsd 0x8(%rsp), %xmm0
movsd %xmm0, 0x38(%rsp)
movq 0x88(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x88(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x110d3f
movq 0x88(%rsp), %rdi
callq 0xc670
movq 0x88(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq $0xd, (%rax)
movsd 0x38(%rsp), %xmm0
movq 0x40(%rsp), %rax
movsd %xmm0, 0x8(%rax)
movq 0x40(%rsp), %rax
movq %rax, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq %rax, 0x90(%rsp)
jmp 0x110db9
movq 0x88(%rsp), %rdi
movq 0x48(%rsp), %rsi
movq 0x50(%rsp), %rdx
callq 0x11a80
movq %rax, 0x90(%rsp)
movq 0x90(%rsp), %rax
addq $0x98, %rsp
retq
nopl (%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: subtract_ratios
static s7_pointer subtract_ratios(s7_scheme *sc, s7_pointer x, s7_pointer y)
    {
        s7_int d1, d2, n1, n2;
        d1 = number_to_denominator(x);
        n1 = number_to_numerator(x);
        d2 = number_to_denominator(y);
        n2 = number_to_numerator(y);

        if (d1 == d2)                                     /* the easy case -- if overflow here, it matches the int32_t case */
            return(s7_make_ratio(sc, n1 - n2, d1));

#if (!WITH_GMP) && HAVE_OVERFLOW_CHECKS
        {
            s7_int n1d2, n2d1, d1d2, dn;
            if ((multiply_overflow(d1, d2, &d1d2)) ||
                    (multiply_overflow(n1, d2, &n1d2)) ||
                    (multiply_overflow(n2, d1, &n2d1)) ||
                    (subtract_overflow(n1d2, n2d1, &dn)))
                return(make_real(sc, ((long_double)n1 / (long_double)d1) - ((long_double)n2 / (long_double)d2)));
            return(s7_make_ratio(sc, dn, d1d2));
        }
#else
        return(s7_make_ratio(sc, n1 * d2 - n2 * d1, d1 * d2));
#endif
    }

// Assembly:
subq $0xa8, %rsp
movq %rdi, 0x98(%rsp)
movq %rsi, 0x90(%rsp)
movq %rdx, 0x88(%rsp)
movq 0x90(%rsp), %rdi
callq 0x110e10
movq %rax, 0x80(%rsp)
movq 0x90(%rsp), %rdi
callq 0x110dd0
movq %rax, 0x70(%rsp)
movq 0x88(%rsp), %rdi
callq 0x110e10
movq %rax, 0x78(%rsp)
movq 0x88(%rsp), %rdi
callq 0x110dd0
movq %rax, 0x68(%rsp)
movq 0x80(%rsp), %rax
cmpq 0x78(%rsp), %rax
jne 0x111745
movq 0x98(%rsp), %rdi
movq 0x70(%rsp), %rsi
subq 0x68(%rsp), %rsi
movq 0x80(%rsp), %rdx
callq 0x11a80
movq %rax, 0xa0(%rsp)
jmp 0x1118a3
movq 0x80(%rsp), %rcx
imulq 0x78(%rsp), %rcx
seto %al
movq %rcx, 0x50(%rsp)
testb $0x1, %al
jne 0x1117ab
movq 0x70(%rsp), %rcx
imulq 0x78(%rsp), %rcx
seto %al
movq %rcx, 0x60(%rsp)
testb $0x1, %al
jne 0x1117ab
movq 0x68(%rsp), %rcx
imulq 0x80(%rsp), %rcx
seto %al
movq %rcx, 0x58(%rsp)
testb $0x1, %al
jne 0x1117ab
movq 0x60(%rsp), %rcx
subq 0x58(%rsp), %rcx
seto %al
movq %rcx, 0x48(%rsp)
testb $0x1, %al
jne 0x1117ab
jmp 0x111884
movq 0x70(%rsp), %rax
movq %rax, 0x10(%rsp)
fildll 0x10(%rsp)
movq 0x80(%rsp), %rax
movq %rax, 0x18(%rsp)
fildll 0x18(%rsp)
fdivrp %st, %st(1)
movq 0x68(%rsp), %rax
movq %rax, 0x20(%rsp)
fildll 0x20(%rsp)
movq 0x78(%rsp), %rax
movq %rax, 0x28(%rsp)
fildll 0x28(%rsp)
fdivrp %st, %st(1)
fsubrp %st, %st(1)
fstpl 0x8(%rsp)
movsd 0x8(%rsp), %xmm0
movsd %xmm0, 0x38(%rsp)
movq 0x98(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x98(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x111829
movq 0x98(%rsp), %rdi
callq 0xc670
movq 0x98(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq $0xd, (%rax)
movsd 0x38(%rsp), %xmm0
movq 0x40(%rsp), %rax
movsd %xmm0, 0x8(%rax)
movq 0x40(%rsp), %rax
movq %rax, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq %rax, 0xa0(%rsp)
jmp 0x1118a3
movq 0x98(%rsp), %rdi
movq 0x48(%rsp), %rsi
movq 0x50(%rsp), %rdx
callq 0x11a80
movq %rax, 0xa0(%rsp)
movq 0xa0(%rsp), %rax
addq $0xa8, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: fx_num_eq_xi_1
static s7_pointer fx_num_eq_xi_1(s7_scheme *sc, s7_pointer args, s7_pointer val, s7_int y)
                {
#if S7_DEBUGGING
                    if (is_t_integer(val)) fprintf(stderr, "%s[%d]: %s is an integer\n", __func__, __LINE__, DISPLAY(val));
#endif
                    switch (type(val))
                    {
                        case T_RATIO:   return(sc->F);
                        case T_REAL:    return(make_boolean(sc, real(val) == y));
                        case T_COMPLEX: return(sc->F);
                        default: return(method_or_bust_with_type(sc, val, sc->num_eq_symbol, list_2(sc, val, cadr(args)), a_number_string, 1));
                    }
                    return(sc->T);
                }

// Assembly:
subq $0x88, %rsp
movq %rdi, 0x78(%rsp)
movq %rsi, 0x70(%rsp)
movq %rdx, 0x68(%rsp)
movq %rcx, 0x60(%rsp)
movq 0x68(%rsp), %rax
movzbl (%rax), %eax
movl %eax, 0x3c(%rsp)
subl $0xc, %eax
je 0x111db7
jmp 0x111d9e
movl 0x3c(%rsp), %eax
subl $0xd, %eax
je 0x111dd0
jmp 0x111da9
movl 0x3c(%rsp), %eax
subl $0xe, %eax
je 0x111e1f
jmp 0x111e38
movq 0x78(%rsp), %rax
movq 0x120(%rax), %rax
movq %rax, 0x80(%rsp)
jmp 0x111f4d
movq 0x68(%rsp), %rax
movsd 0x8(%rax), %xmm0
cvtsi2sdq 0x60(%rsp), %xmm1
ucomisd %xmm1, %xmm0
jne 0x111dfc
jp 0x111dfc
movq 0x78(%rsp), %rax
movq 0x118(%rax), %rax
movq %rax, 0x30(%rsp)
jmp 0x111e0d
movq 0x78(%rsp), %rax
movq 0x120(%rax), %rax
movq %rax, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq %rax, 0x80(%rsp)
jmp 0x111f4d
movq 0x78(%rsp), %rax
movq 0x120(%rax), %rax
movq %rax, 0x80(%rsp)
jmp 0x111f4d
movq 0x78(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x68(%rsp), %rax
movq %rax, 0x10(%rsp)
movq 0x78(%rsp), %rax
movq 0xea0(%rax), %rax
movq %rax, 0x18(%rsp)
movq 0x78(%rsp), %rax
movq %rax, 0x20(%rsp)
movq 0x68(%rsp), %rax
movq %rax, 0x28(%rsp)
movq 0x70(%rsp), %rax
movq 0x10(%rax), %rax
movq 0x8(%rax), %rax
movq %rax, 0x50(%rsp)
movq 0x78(%rsp), %rax
movq 0x110(%rax), %rax
movq %rax, 0x48(%rsp)
movq 0x78(%rsp), %rax
movq 0x90(%rax), %rax
movq 0x78(%rsp), %rcx
cmpq 0x98(%rcx), %rax
ja 0x111eb8
movq 0x78(%rsp), %rdi
callq 0xc670
movq 0x78(%rsp), %rcx
movq 0x90(%rcx), %rax
movq %rax, %rdx
addq $-0x8, %rdx
movq %rdx, 0x90(%rcx)
movq -0x8(%rax), %rax
movq %rax, 0x58(%rsp)
movq 0x58(%rsp), %rax
movq $0x200001, (%rax)       # imm = 0x200001
movq 0x28(%rsp), %rsi
movq 0x20(%rsp), %rdi
movq 0x50(%rsp), %rcx
movq 0x58(%rsp), %rax
movq %rcx, 0x8(%rax)
movq 0x48(%rsp), %rcx
movq 0x58(%rsp), %rax
movq %rcx, 0x10(%rax)
movq 0x58(%rsp), %rax
movq %rax, 0x40(%rsp)
movq 0x40(%rsp), %rdx
callq 0xd9f0
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rsi
movq 0x18(%rsp), %rdx
movq %rax, %rcx
movq 0x112fb6(%rip), %r8     # 0x224ef0
movl $0x1, %r9d
callq 0x14130
movq %rax, 0x80(%rsp)
movq 0x80(%rsp), %rax
addq $0x88, %rsp
retq
nopl (%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: old_frame_with_slot
static s7_pointer old_frame_with_slot(s7_scheme *sc, s7_pointer env, s7_pointer val)
    {
        s7_pointer x, sym;
        uint64_t id;

        id = ++sc->let_number;
        let_id(env) = id;
        x = let_slots(env);
        slot_set_value(x, val);
        sym = slot_symbol(x);
        symbol_set_local(sym, id, x);
        return(env);
    }

// Assembly:
movq %rdi, -0x8(%rsp)
movq %rsi, -0x10(%rsp)
movq %rdx, -0x18(%rsp)
movq -0x8(%rsp), %rcx
movq 0x250(%rcx), %rax
addq $0x1, %rax
movq %rax, 0x250(%rcx)
movq %rax, -0x30(%rsp)
movq -0x30(%rsp), %rcx
movq -0x10(%rsp), %rax
movq %rcx, 0x18(%rax)
movq -0x10(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, -0x20(%rsp)
movq -0x18(%rsp), %rcx
movq -0x20(%rsp), %rax
movq %rcx, 0x10(%rax)
movq -0x20(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, -0x28(%rsp)
movq -0x20(%rsp), %rcx
movq -0x28(%rsp), %rax
movq %rcx, 0x18(%rax)
movq -0x30(%rsp), %rcx
movq -0x28(%rsp), %rax
movq %rcx, 0x20(%rax)
movq -0x28(%rsp), %rax
movl 0x28(%rax), %ecx
addl $0x1, %ecx
movl %ecx, 0x28(%rax)
movq -0x10(%rsp), %rax
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: lint_let_ref_1
static s7_pointer lint_let_ref_1(s7_scheme *sc, s7_pointer lt, s7_pointer sym)
    {
        s7_pointer x, y;
        for (x = lt; is_let(x); x = outlet(x))
            for (y = let_slots(x); tis_slot(y); y = next_slot(y))
                if (slot_symbol(y) == sym)
                    return(slot_value(y));

        if (has_methods(lt))
        {
            if (has_let_ref_fallback(lt))
                return(call_let_ref_fallback(sc, lt, sym));
        }
        else
        {
            y = global_slot(sym);
            if (is_slot(y))
                return(slot_value(y));
        }
        return(sc->undefined);
    }

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x28(%rsp)
movq %rsi, 0x20(%rsp)
movq %rdx, 0x18(%rsp)
movq 0x20(%rsp), %rax
movq %rax, 0x10(%rsp)
movq 0x10(%rsp), %rax
movzbl (%rax), %eax
cmpl $0x1c, %eax
jne 0x112087
movq 0x10(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, 0x8(%rsp)
cmpq $0x0, 0x8(%rsp)
je 0x112075
movq 0x8(%rsp), %rax
movq 0x8(%rax), %rax
cmpq 0x18(%rsp), %rax
jne 0x112063
movq 0x8(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, 0x30(%rsp)
jmp 0x11210c
jmp 0x112065
movq 0x8(%rsp), %rax
movq 0x18(%rax), %rax
movq %rax, 0x8(%rsp)
jmp 0x112038
jmp 0x112077
movq 0x10(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, 0x10(%rsp)
jmp 0x11201d
movq 0x20(%rsp), %rax
movq (%rax), %rax
andq $0x40000000, %rax       # imm = 0x40000000
cmpq $0x0, %rax
je 0x1120ce
movq 0x20(%rsp), %rax
movq (%rax), %rax
andq $0x44000000, %rax       # imm = 0x44000000
cmpq $0x44000000, %rax       # imm = 0x44000000
jne 0x1120cc
movq 0x28(%rsp), %rdi
movq 0x20(%rsp), %rsi
movq 0x18(%rsp), %rdx
callq 0xeb80
movq %rax, 0x30(%rsp)
jmp 0x11210c
jmp 0x1120fb
movq 0x18(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, 0x8(%rsp)
movq 0x8(%rsp), %rax
movzbl (%rax), %eax
cmpl $0x20, %eax
jne 0x1120f9
movq 0x8(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, 0x30(%rsp)
jmp 0x11210c
jmp 0x1120fb
movq 0x28(%rsp), %rax
movq 0x128(%rax), %rax
movq %rax, 0x30(%rsp)
movq 0x30(%rsp), %rax
addq $0x38, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_i_ii_ff
static s7_int opt_i_ii_ff(opt_info *o)
                {
                    opt_info *o1;
                    s7_int i1;
                    s7_scheme *sc;
                    sc = o->sc;
                    o1 = sc->opts[++sc->pc];
                    i1 = o1->v[0].fi(o1);
                    o1 = sc->opts[++sc->pc];
                    oo_rc(o->sc, o, 4, 0);
                    return(o->v[3].i_ii_f(i1, o1->v[0].fi(o1)));
                }

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x18(%rsp)
movq 0x18(%rsp), %rax
movq 0x18(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x28(%rsp)
movq 0x28(%rsp), %rax
movq (%rax), %rax
movq 0x28(%rsp), %rdi
callq *%rax
movq %rax, 0x20(%rsp)
movq 0x18(%rsp), %rax
movq 0x18(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x28(%rsp)
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x20(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x28(%rsp), %rax
movq (%rax), %rax
movq 0x28(%rsp), %rdi
callq *%rax
movq 0x8(%rsp), %rdi
movq %rax, %rsi
movq 0x10(%rsp), %rax
callq *%rax
addq $0x38, %rsp
retq
nopl (%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_types_match
static s7_pointer opt_types_match(s7_scheme *sc, s7_pointer check, s7_pointer sym)
                {
                    s7_pointer slot, checker;
                    checker = s7_symbol_value(sc, check);
                    slot = symbol_to_slot(sc, sym);
                    if (is_slot(slot))
                    {
                        s7_pointer obj;
                        obj = slot_value(slot);
                        if (s7_apply_function(sc, checker, set_plist_1(sc, obj)) == sc->T)
                            return(slot);
                    }
                    return(NULL);
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x38(%rsp)
movq %rsi, 0x30(%rsp)
movq %rdx, 0x28(%rsp)
movq 0x38(%rsp), %rdi
movq 0x30(%rsp), %rsi
callq 0xb3a0
movq %rax, 0x18(%rsp)
movq 0x38(%rsp), %rdi
movq 0x28(%rsp), %rsi
callq 0xfc80
movq %rax, 0x20(%rsp)
movq 0x20(%rsp), %rax
movzbl (%rax), %eax
cmpl $0x20, %eax
jne 0x112cf5
movq 0x20(%rsp), %rax
movq 0x10(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x38(%rsp), %rax
movq %rax, (%rsp)
movq 0x18(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x38(%rsp), %rdi
movq 0x10(%rsp), %rsi
callq 0x35ea0
movq (%rsp), %rdi
movq 0x8(%rsp), %rsi
movq %rax, %rdx
callq 0xda50
movq 0x38(%rsp), %rcx
cmpq 0x118(%rcx), %rax
jne 0x112cf3
movq 0x20(%rsp), %rax
movq %rax, 0x40(%rsp)
jmp 0x112cfe
jmp 0x112cf5
movq $0x0, 0x40(%rsp)
movq 0x40(%rsp), %rax
addq $0x48, %rsp
retq
nopl (%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_i_iii_fff
static s7_int opt_i_iii_fff(opt_info *o)
                {
                    opt_info *o1;
                    s7_int i1, i2;
                    s7_scheme *sc;
                    sc = o->sc;
                    o1 = sc->opts[++sc->pc];
                    i1 = o1->v[0].fi(o1);
                    o1 = sc->opts[++sc->pc];
                    i2 = o1->v[0].fi(o1);
                    o1 = sc->opts[++sc->pc];
                    oo_rc(sc, o, 4, 0);
                    return(o->v[3].i_iii_f(i1, i2, o1->v[0].fi(o1)));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x20(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movq %rax, 0x30(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movq %rax, 0x28(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x40(%rsp), %rax
movq 0x18(%rax), %rax
movq %rax, 0x18(%rsp)
movq 0x30(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x28(%rsp), %rax
movq %rax, 0x10(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rsi
movq %rax, %rdx
movq 0x18(%rsp), %rax
callq *%rax
addq $0x48, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_i_add2
static s7_int opt_i_add2(opt_info *o)
                {
                    opt_info *o1;
                    s7_int sum;
                    s7_scheme *sc;
                    sc = o->sc;
                    o1 = sc->opts[++sc->pc];
                    sum = o1->v[0].fi(o1);
                    o1 = sc->opts[++sc->pc];
                    return(sum + o1->v[0].fi(o1));
                }

// Assembly:
subq $0x28, %rsp
movq %rdi, 0x20(%rsp)
movq 0x20(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x8(%rsp)
movq 0x8(%rsp), %rax
movq 0x8(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x18(%rsp)
movq 0x18(%rsp), %rax
movq (%rax), %rax
movq 0x18(%rsp), %rdi
callq *%rax
movq %rax, 0x10(%rsp)
movq 0x8(%rsp), %rax
movq 0x8(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x18(%rsp)
movq 0x10(%rsp), %rax
movq %rax, (%rsp)
movq 0x18(%rsp), %rax
movq (%rax), %rax
movq 0x18(%rsp), %rdi
callq *%rax
movq %rax, %rcx
movq (%rsp), %rax
addq %rcx, %rax
addq $0x28, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_i_add_any_f
static s7_int opt_i_add_any_f(opt_info *o)
                {
                    s7_int sum = 0;
                    int32_t i;
                    oo_rc(o->sc, o, 2, 0);
                    for (i = 0; i < o->v[1].i; i++)
                    {
                        opt_info *o1;
                        o1 = o->sc->opts[++o->sc->pc];
                        sum += o1->v[0].fi(o1);
                    }
                    return(sum);
                }

// Assembly:
subq $0x28, %rsp
movq %rdi, 0x20(%rsp)
movq $0x0, 0x18(%rsp)
movl $0x0, 0x14(%rsp)
movslq 0x14(%rsp), %rax
movq 0x20(%rsp), %rcx
cmpq 0x8(%rcx), %rax
jge 0x113461
movq 0x20(%rsp), %rax
movq 0x68(%rax), %rax
movq 0x20(%rsp), %rcx
movq 0x68(%rcx), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x8(%rsp)
movq 0x8(%rsp), %rax
movq (%rax), %rax
movq 0x8(%rsp), %rdi
callq *%rax
addq 0x18(%rsp), %rax
movq %rax, 0x18(%rsp)
movl 0x14(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x14(%rsp)
jmp 0x1133fa
movq 0x18(%rsp), %rax
addq $0x28, %rsp
retq
nopl (%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_i_multiply_any_f
static s7_int opt_i_multiply_any_f(opt_info *o)
                {
                    s7_int sum = 1;
                    int32_t i;
                    for (i = 0; i < o->v[1].i; i++)
                    {
                        opt_info *o1;
                        o1 = o->sc->opts[++o->sc->pc];
                        sum *= o1->v[0].fi(o1);
                    }
                    return(sum);
                }

// Assembly:
subq $0x28, %rsp
movq %rdi, 0x20(%rsp)
movq $0x1, 0x18(%rsp)
movl $0x0, 0x14(%rsp)
movslq 0x14(%rsp), %rax
movq 0x20(%rsp), %rcx
cmpq 0x8(%rcx), %rax
jge 0x1134f2
movq 0x20(%rsp), %rax
movq 0x68(%rax), %rax
movq 0x20(%rsp), %rcx
movq 0x68(%rcx), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x8(%rsp)
movq 0x8(%rsp), %rax
movq (%rax), %rax
movq 0x8(%rsp), %rdi
callq *%rax
imulq 0x18(%rsp), %rax
movq %rax, 0x18(%rsp)
movl 0x14(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x14(%rsp)
jmp 0x11348a
movq 0x18(%rsp), %rax
addq $0x28, %rsp
retq
nopl (%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_7pii_sff
static s7_double opt_d_7pii_sff(opt_info *o)
                {
                    opt_info *o1;
                    s7_int i1;
                    s7_scheme *sc;
                    sc = o->sc;
                    o1 = sc->opts[++sc->pc];
                    i1 = o1->v[0].fi(o1);
                    o1 = sc->opts[++sc->pc];
                    oo_rc(sc, o, 5, 1);
                    return(o->v[4].d_7pii_f(sc, slot_value(o->v[1].p), i1, o1->v[0].fi(o1)));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x28(%rsp)
movq 0x28(%rsp), %rax
movq 0x28(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movq %rax, 0x30(%rsp)
movq 0x28(%rsp), %rax
movq 0x28(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x40(%rsp), %rax
movq 0x20(%rax), %rax
movq %rax, 0x20(%rsp)
movq 0x28(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x40(%rsp), %rax
movq 0x8(%rax), %rax
movq 0x10(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x30(%rsp), %rax
movq %rax, 0x18(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rsi
movq 0x18(%rsp), %rdx
movq %rax, %rcx
movq 0x20(%rsp), %rax
callq *%rax
addq $0x48, %rsp
retq
nop
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: d_dd_sf_combinable
static bool d_dd_sf_combinable(s7_scheme *sc, opt_info *opc, s7_d_dd_t func)
                {
                    if ((sc->pc > 1) &&
                            (opc == sc->opts[sc->pc - 2]))
                    {
                        opt_info *o1;
                        o1 = sc->opts[sc->pc - 1];
                        if (o1->v[0].fd == opt_d_7pi_ss)
                        {
                            if (func)
                            {
                                opc->v[4].d_dd_f = opc->v[3].d_dd_f; /* need room for 3 symbols */
                                opc->v[0].fd = opt_d_dd_sfo;
                            }
                            else
                            {
                                opc->v[4].d_7dd_f = opc->v[3].d_7dd_f; /* need room for 3 symbols */
                                opc->v[0].fd = opt_d_7dd_sfo;
                            }
                            opc->v[2].p = o1->v[1].p;
                            opc->v[3].p = o1->v[2].p;
                            opc->v[5].d_7pi_f = o1->v[3].d_7pi_f;
                            backup_pc(sc);
                            return(oo_set_type_3(opc, 6, 1, 2, 3, OO_D, OO_P, OO_I));
                        }
                    }
                    return(return_false(sc, NULL, __func__, __LINE__));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x38(%rsp)
movq %rsi, 0x30(%rsp)
movq %rdx, 0x28(%rsp)
movq 0x38(%rsp), %rax
cmpl $0x1, 0x2258(%rax)
jle 0x113fbe
movq 0x30(%rsp), %rax
movq 0x38(%rsp), %rcx
movq 0x38(%rsp), %rdx
movl 0x2258(%rdx), %edx
subl $0x2, %edx
movslq %edx, %rdx
cmpq 0x2260(%rcx,%rdx,8), %rax
jne 0x113fbe
movq 0x38(%rsp), %rax
movq 0x38(%rsp), %rcx
movl 0x2258(%rcx), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x20(%rsp)
movq 0x20(%rsp), %rax
leaq -0x2dd2d(%rip), %rcx    # 0xe61a0
cmpq %rcx, (%rax)
jne 0x113fbc
cmpq $0x0, 0x28(%rsp)
je 0x113f01
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x30(%rsp), %rax
leaq 0x1514(%rip), %rcx      # 0x115410
movq %rcx, (%rax)
jmp 0x113f22
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x30(%rsp), %rax
leaq 0x1571(%rip), %rcx      # 0x115490
movq %rcx, (%rax)
movq 0x20(%rsp), %rax
movq 0x8(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x10(%rax)
movq 0x20(%rsp), %rax
movq 0x10(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x18(%rax)
movq 0x20(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x28(%rax)
movq 0x38(%rsp), %rax
movl 0x2258(%rax), %ecx
addl $-0x1, %ecx
movl %ecx, 0x2258(%rax)
movq 0x30(%rsp), %rdi
movl $0x6, %esi
movl $0x1, %edx
movl $0x2, %r9d
movl $0x3, %r8d
xorl %eax, %eax
leaq 0xdb6cd(%rip), %rax     # 0x1ef65d
movl %r9d, %ecx
movl $0x0, (%rsp)
movl $0x1, 0x8(%rsp)
movq %rax, 0x10(%rsp)
movl $0xe17c, 0x18(%rsp)     # imm = 0xE17C
callq 0xe53d0
andb $0x1, %al
movb %al, 0x47(%rsp)
jmp 0x113fc3
jmp 0x113fbe
movb $0x0, 0x47(%rsp)
movb 0x47(%rsp), %al
andb $0x1, %al
addq $0x48, %rsp
retq
nop
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: d_dd_fs_combinable
static bool d_dd_fs_combinable(s7_scheme *sc, opt_info *opc, s7_d_dd_t func)
                {
                    if ((sc->pc > 1) &&
                            (opc == sc->opts[sc->pc - 2]))
                    {
                        opt_info *o1;
                        o1 = sc->opts[sc->pc - 1];
                        if (o1->v[0].fd == opt_d_7pi_ss)
                        {
                            if (func)
                            {
                                opc->v[4].d_dd_f = opc->v[3].d_dd_f; /* need room for 3 symbols */
                                opc->v[0].fd = opt_d_dd_fso;
                            }
                            else
                            {
                                opc->v[4].d_7dd_f = opc->v[3].d_7dd_f;
                                opc->v[0].fd = opt_d_7dd_fso;
                            }
                            opc->v[2].p = o1->v[1].p;
                            opc->v[3].p = o1->v[2].p;
                            opc->v[5].d_7pi_f = o1->v[3].d_7pi_f;
                            backup_pc(sc);
                            return(oo_set_type_3(opc, 6, 1, 2, 3, OO_D, OO_P, OO_I));
                        }
                    }
                    return(return_false(sc, NULL, __func__, __LINE__));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x38(%rsp)
movq %rsi, 0x30(%rsp)
movq %rdx, 0x28(%rsp)
movq 0x38(%rsp), %rax
cmpl $0x1, 0x2258(%rax)
jle 0x1144ce
movq 0x30(%rsp), %rax
movq 0x38(%rsp), %rcx
movq 0x38(%rsp), %rdx
movl 0x2258(%rdx), %edx
subl $0x2, %edx
movslq %edx, %rdx
cmpq 0x2260(%rcx,%rdx,8), %rax
jne 0x1144ce
movq 0x38(%rsp), %rax
movq 0x38(%rsp), %rcx
movl 0x2258(%rcx), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x20(%rsp)
movq 0x20(%rsp), %rax
leaq -0x2e23d(%rip), %rcx    # 0xe61a0
cmpq %rcx, (%rax)
jne 0x1144cc
cmpq $0x0, 0x28(%rsp)
je 0x114411
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x30(%rsp), %rax
leaq -0x2e0cc(%rip), %rcx    # 0xe6340
movq %rcx, (%rax)
jmp 0x114432
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x20(%rax)
movq 0x30(%rsp), %rax
leaq 0x10f1(%rip), %rcx      # 0x115520
movq %rcx, (%rax)
movq 0x20(%rsp), %rax
movq 0x8(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x10(%rax)
movq 0x20(%rsp), %rax
movq 0x10(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x18(%rax)
movq 0x20(%rsp), %rax
movq 0x18(%rax), %rcx
movq 0x30(%rsp), %rax
movq %rcx, 0x28(%rax)
movq 0x38(%rsp), %rax
movl 0x2258(%rax), %ecx
addl $-0x1, %ecx
movl %ecx, 0x2258(%rax)
movq 0x30(%rsp), %rdi
movl $0x6, %esi
movl $0x1, %edx
movl $0x2, %r9d
movl $0x3, %r8d
xorl %eax, %eax
leaq 0xdb1d0(%rip), %rax     # 0x1ef670
movl %r9d, %ecx
movl $0x0, (%rsp)
movl $0x1, 0x8(%rsp)
movq %rax, 0x10(%rsp)
movl $0xe1bb, 0x18(%rsp)     # imm = 0xE1BB
callq 0xe53d0
andb $0x1, %al
movb %al, 0x47(%rsp)
jmp 0x1144d3
jmp 0x1144ce
movb $0x0, 0x47(%rsp)
movb 0x47(%rsp), %al
andb $0x1, %al
addq $0x48, %rsp
retq
nop
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_dd_ff
static s7_double opt_d_dd_ff(opt_info *o)
                {
                    opt_info *o1, *o2;
                    s7_double x1;
                    s7_scheme *sc;
                    sc = o->sc;
                    oo_rc(sc, o, 4, 0);
                    o1 = sc->opts[++sc->pc];
                    x1 = o1->v[0].fd(o1);
                    o2 = sc->opts[++sc->pc];
                    return(o->v[3].d_dd_f(x1, o2->v[0].fd(o2)));
                }

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x10(%rsp), %rax
movq 0x10(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x28(%rsp)
movq 0x28(%rsp), %rax
movq (%rax), %rax
movq 0x28(%rsp), %rdi
callq *%rax
movsd %xmm0, 0x18(%rsp)
movq 0x10(%rsp), %rax
movq 0x10(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x20(%rsp)
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rax
movq %rax, (%rsp)
movsd 0x18(%rsp), %xmm0
movsd %xmm0, 0x8(%rsp)
movq 0x20(%rsp), %rax
movq (%rax), %rax
movq 0x20(%rsp), %rdi
callq *%rax
movq (%rsp), %rax
movaps %xmm0, %xmm1
movsd 0x8(%rsp), %xmm0
callq *%rax
addq $0x38, %rsp
retq
nopw (%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_dd_ff_mul
static s7_double opt_d_dd_ff_mul(opt_info *o)
                {
                    opt_info *o1, *o2;
                    s7_double x1;
                    s7_scheme *sc;
                    sc = o->sc;
                    oo_rc(sc, o, 4, 0);
                    o1 = sc->opts[++sc->pc];
                    x1 = o1->v[0].fd(o1);
                    o2 = sc->opts[++sc->pc];
                    return(x1 * o2->v[0].fd(o2));
                }

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x10(%rsp), %rax
movq 0x10(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x28(%rsp)
movq 0x28(%rsp), %rax
movq (%rax), %rax
movq 0x28(%rsp), %rdi
callq *%rax
movsd %xmm0, 0x18(%rsp)
movq 0x10(%rsp), %rax
movq 0x10(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x20(%rsp)
movsd 0x18(%rsp), %xmm0
movsd %xmm0, 0x8(%rsp)
movq 0x20(%rsp), %rax
movq (%rax), %rax
movq 0x20(%rsp), %rdi
callq *%rax
movaps %xmm0, %xmm1
movsd 0x8(%rsp), %xmm0
mulsd %xmm1, %xmm0
addq $0x38, %rsp
retq
nopl (%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_dd_ff_add_mul
static s7_double opt_d_dd_ff_add_mul(opt_info *o)
                {
                    s7_double x1, x2;
                    opt_info *o2;
                    oo_rc(o->sc, o, 12, 0);
                    o->sc->pc++;                  /* local sc made no difference */
                    x1 = o->v[5].fd(o->v[4].o1);
                    o->sc->pc += 2;
                    x2 = o->v[11].fd(o->v[10].o1);
                    o2 = o->sc->opts[++o->sc->pc];
                    return(x1 + (x2 * o2->v[0].fd(o2)));
                }

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq 0x68(%rax), %rax
movl 0x2258(%rax), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rax)
movq 0x30(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x30(%rsp), %rcx
movq 0x20(%rcx), %rdi
callq *%rax
movsd %xmm0, 0x28(%rsp)
movq 0x30(%rsp), %rax
movq 0x68(%rax), %rax
movl 0x2258(%rax), %ecx
addl $0x2, %ecx
movl %ecx, 0x2258(%rax)
movq 0x30(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x30(%rsp), %rcx
movq 0x50(%rcx), %rdi
callq *%rax
movsd %xmm0, 0x20(%rsp)
movq 0x30(%rsp), %rax
movq 0x68(%rax), %rax
movq 0x30(%rsp), %rcx
movq 0x68(%rcx), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x18(%rsp)
movsd 0x28(%rsp), %xmm0
movsd %xmm0, 0x8(%rsp)
movsd 0x20(%rsp), %xmm0
movsd %xmm0, 0x10(%rsp)
movq 0x18(%rsp), %rax
movq (%rax), %rax
movq 0x18(%rsp), %rdi
callq *%rax
movsd 0x8(%rsp), %xmm1
movaps %xmm0, %xmm2
movsd 0x10(%rsp), %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addq $0x38, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_dd_ff_add_fv_ref
static s7_double opt_d_dd_ff_add_fv_ref(opt_info *o)
                {
                    opt_info *o1, *o2;
                    s7_double x1;
                    s7_scheme *sc;
                    sc = o->sc;
                    oo_rc(sc, o, 4, 0);
                    o1 = sc->opts[++sc->pc];
                    x1 = o1->v[0].fd(o1);
                    o1 = sc->opts[++sc->pc];
                    o2 = sc->opts[++sc->pc];
                    return(x1 + float_vector_ref_d_7pi(sc, slot_value(o1->v[1].p), o2->v[0].fi(o2)));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x20(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movsd %xmm0, 0x28(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x30(%rsp)
movsd 0x28(%rsp), %xmm0
movsd %xmm0, 0x18(%rsp)
movq 0x20(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x38(%rsp), %rax
movq 0x8(%rax), %rax
movq 0x10(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x30(%rsp), %rax
movq (%rax), %rax
movq 0x30(%rsp), %rdi
callq *%rax
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rsi
movq %rax, %rdx
callq 0xa71f0
movaps %xmm0, %xmm1
movsd 0x18(%rsp), %xmm0
addsd %xmm1, %xmm0
addq $0x48, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_dd_ff_add
static s7_double opt_d_dd_ff_add(opt_info *o)
                {
                    s7_double x1;
                    oo_rc(o->sc, o, 12, 0);
                    o->sc->pc++;
                    x1 = o->v[5].fd(o->v[4].o1);
                    o->sc->pc++;
                    return(x1 + o->v[11].fd(o->v[10].o1));
                }

// Assembly:
subq $0x18, %rsp
movq %rdi, 0x10(%rsp)
movq 0x10(%rsp), %rax
movq 0x68(%rax), %rax
movl 0x2258(%rax), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rax)
movq 0x10(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x10(%rsp), %rcx
movq 0x20(%rcx), %rdi
callq *%rax
movsd %xmm0, 0x8(%rsp)
movq 0x10(%rsp), %rax
movq 0x68(%rax), %rax
movl 0x2258(%rax), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rax)
movsd 0x8(%rsp), %xmm0
movsd %xmm0, (%rsp)
movq 0x10(%rsp), %rax
movq 0x58(%rax), %rax
movq 0x10(%rsp), %rcx
movq 0x50(%rcx), %rdi
callq *%rax
movaps %xmm0, %xmm1
movsd (%rsp), %xmm0
addsd %xmm1, %xmm0
addq $0x18, %rsp
retq
nopw %cs:(%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_7dd_ff
static s7_double opt_d_7dd_ff(opt_info *o)
                {
                    opt_info *o1, *o2;
                    s7_double x1;
                    s7_scheme *sc;
                    sc = o->sc;
                    oo_rc(sc, o, 4, 0);
                    o1 = sc->opts[++sc->pc];
                    x1 = o1->v[0].fd(o1);
                    o2 = sc->opts[++sc->pc];
                    return(o->v[3].d_7dd_f(sc, x1, o2->v[0].fd(o2)));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x20(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x38(%rsp), %rax
movq (%rax), %rax
movq 0x38(%rsp), %rdi
callq *%rax
movsd %xmm0, 0x28(%rsp)
movq 0x20(%rsp), %rax
movq 0x20(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x30(%rsp)
movq 0x40(%rsp), %rax
movq 0x18(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x20(%rsp), %rax
movq %rax, 0x8(%rsp)
movsd 0x28(%rsp), %xmm0
movsd %xmm0, 0x18(%rsp)
movq 0x30(%rsp), %rax
movq (%rax), %rax
movq 0x30(%rsp), %rdi
callq *%rax
movq 0x8(%rsp), %rdi
movq 0x10(%rsp), %rax
movaps %xmm0, %xmm1
movsd 0x18(%rsp), %xmm0
callq *%rax
addq $0x48, %rsp
retq
nopl (%rax,%rax)
// File: /workspace/github_c_makefile_star2_O0/BernardTatin[P]s7sh/s7.c
// Function: opt_d_dd_fff
static s7_double opt_d_dd_fff(opt_info *o)
                {
                    opt_info *o1, *o2;
                    s7_double x1, x2;
                    s7_scheme *sc;
                    sc = o->sc;
                    o1 = sc->opts[++sc->pc];
                    x1 = o1->v[4].d_dd_f(o1->v[5].d_7pi_f(sc, slot_value(o1->v[2].p), integer(slot_value(o1->v[3].p))), real(slot_value(o1->v[1].p))); /* dd_fso */
                    o2 = sc->opts[++sc->pc];
                    x2 = o2->v[4].d_dd_f(o2->v[5].d_7pi_f(sc, slot_value(o2->v[2].p), integer(slot_value(o2->v[3].p))), real(slot_value(o2->v[1].p))); /* dd_fso */
                    oo_rc(sc, o, 4, 0);
                    return(o->v[3].d_dd_f(x1, x2));
                }

// Assembly:
subq $0x48, %rsp
movq %rdi, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq 0x68(%rax), %rax
movq %rax, 0x18(%rsp)
movq 0x18(%rsp), %rax
movq 0x18(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x38(%rsp)
movq 0x38(%rsp), %rax
movq 0x20(%rax), %rax
movq %rax, 0x8(%rsp)
movq 0x38(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x18(%rsp), %rdi
movq 0x38(%rsp), %rcx
movq 0x10(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x38(%rsp), %rcx
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rcx
movq 0x8(%rcx), %rdx
callq *%rax
movq 0x8(%rsp), %rax
movq 0x38(%rsp), %rcx
movq 0x8(%rcx), %rcx
movq 0x10(%rcx), %rcx
movsd 0x8(%rcx), %xmm1
callq *%rax
movsd %xmm0, 0x28(%rsp)
movq 0x18(%rsp), %rax
movq 0x18(%rsp), %rdx
movl 0x2258(%rdx), %ecx
addl $0x1, %ecx
movl %ecx, 0x2258(%rdx)
movslq %ecx, %rcx
movq 0x2260(%rax,%rcx,8), %rax
movq %rax, 0x30(%rsp)
movq 0x30(%rsp), %rax
movq 0x20(%rax), %rax
movq %rax, 0x10(%rsp)
movq 0x30(%rsp), %rax
movq 0x28(%rax), %rax
movq 0x18(%rsp), %rdi
movq 0x30(%rsp), %rcx
movq 0x10(%rcx), %rcx
movq 0x10(%rcx), %rsi
movq 0x30(%rsp), %rcx
movq 0x18(%rcx), %rcx
movq 0x10(%rcx), %rcx
movq 0x8(%rcx), %rdx
callq *%rax
movq 0x10(%rsp), %rax
movq 0x30(%rsp), %rcx
movq 0x8(%rcx), %rcx
movq 0x10(%rcx), %rcx
movsd 0x8(%rcx), %xmm1
callq *%rax
movsd %xmm0, 0x20(%rsp)
movq 0x40(%rsp), %rax
movq 0x18(%rax), %rax
movsd 0x28(%rsp), %xmm0
movsd 0x20(%rsp), %xmm1
callq *%rax
addq $0x48, %rsp
retq
nopl (%rax,%rax)