LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_capture_number
static void spec_capture_number(Builder *b, int32_t argc, const Janet *argv) {
    peg_arity(b, argc, 1, 3);
    Reserve r = reserve(b, 4);
    uint32_t base = 0;
    if (argc >= 2) {
        if (!janet_checktype(argv[1], JANET_NIL)) {
            if (!janet_checkint(argv[1])) goto error;
            base = (uint32_t) janet_unwrap_integer(argv[1]);
            if (base < 2 || base > 36) goto error;
        }
    }
    uint32_t tag = (argc == 3) ? emit_tag(b, argv[2]) : 0;
    uint32_t rule = peg_compile1(b, argv[0]);
    emit_3(r, RULE_CAPTURE_NUM, rule, base, tag);
    return;
error:
    peg_panicf(b, "expected integer between 2 and 36, got %v", argv[1]);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x28, %rsp
movq %rdx, %r14
movl %esi, %r15d
movq %rdi, %rbx
movl $0x1, %edx
movl $0x3, %ecx
callq 0x3e1ac
movq %rbx, %rdi
movl $0x4, %esi
callq 0x3d15c
movq %rax, -0x38(%rbp)
movq %rdx, -0x30(%rbp)
xorl %r12d, %r12d
movl $0x0, %r13d
cmpl $0x2, %r15d
jl 0x3dce7
movq 0x8(%r14), %rdi
movq %rdi, %rax
shrq $0x2f, %rax
xorl %r13d, %r13d
movl $0x0, %r12d
cmpl $0x1fff1, %eax          # imm = 0x1FFF1
je 0x3dcd2
callq 0x49912
testl %eax, %eax
je 0x3dd27
movsd 0x8(%r14), %xmm0
cvttsd2si %xmm0, %r12d
leal -0x25(%r12), %eax
cmpl $-0x23, %eax
jb 0x3dd2d
cmpl $0x3, %r15d
jne 0x3dce7
movq 0x10(%r14), %rsi
movq %rbx, %rdi
callq 0x3e1fa
movl %eax, %r13d
movq (%r14), %rsi
movq %rbx, %rdi
callq 0x3cb74
leaq -0x44(%rbp), %r8
movl %eax, (%r8)
movl %r12d, 0x4(%r8)
movl %r13d, 0x8(%r8)
movq -0x38(%rbp), %rdi
movq -0x30(%rbp), %rsi
movl $0x1f, %edx
movl $0x3, %ecx
callq 0x3d395
addq $0x28, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq 0x8(%r14), %rsi
jmp 0x3dd32
movq %xmm0, %rsi
leaq 0x2a493(%rip), %rdi     # 0x681cc
xorl %eax, %eax
callq 0x3f652
movq %rbx, %rdi
movq %rax, %rsi
callq 0x3d135
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_range
static void spec_range(Builder *b, int32_t argc, const Janet *argv) {
    peg_arity(b, argc, 1, -1);
    if (argc == 1) {
        Reserve r = reserve(b, 2);
        const uint8_t *str = peg_getrange(b, argv[0]);
        uint32_t arg = str[0] | (str[1] << 16);
        emit_1(r, RULE_RANGE, arg);
    } else {
        /* Compile as a set */
        Reserve r = reserve(b, 9);
        uint32_t bitmap[8] = {0};
        for (int32_t i = 0; i < argc; i++) {
            const uint8_t *str = peg_getrange(b, argv[i]);
            for (uint32_t c = str[0]; c <= str[1]; c++)
                bitmap_set(bitmap, c);
        }
        emit_rule(r, RULE_SET, 8, bitmap);
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x28, %rsp
movq %rdx, %r14
movl %esi, %r13d
movq %rdi, %rbx
movl $0x1, %edx
movl $0xffffffff, %ecx       # imm = 0xFFFFFFFF
callq 0x3e1ac
movq %rbx, %rdi
cmpl $0x1, %r13d
jne 0x3ddcc
movl $0x2, %esi
callq 0x3d15c
movq %rax, %r15
movq %rdx, %r12
movq (%r14), %rsi
movq %rbx, %rdi
callq 0x3e662
movzbl (%rax), %ecx
movzbl 0x1(%rax), %eax
shll $0x10, %eax
orl %ecx, %eax
leaq -0x50(%rbp), %r8
movl %eax, (%r8)
movq %r15, %rdi
movq %r12, %rsi
movl $0x3, %edx
movl $0x1, %ecx
jmp 0x3de42
movl $0x9, %esi
callq 0x3d15c
movq %rax, -0x30(%rbp)
movq %rdx, %r12
xorps %xmm0, %xmm0
movaps %xmm0, -0x40(%rbp)
movaps %xmm0, -0x50(%rbp)
testl %r13d, %r13d
jle 0x3de2d
movl %r13d, %r13d
xorl %r15d, %r15d
movq (%r14,%r15,8), %rsi
movq %rbx, %rdi
callq 0x3e662
movzbl (%rax), %ecx
movzbl 0x1(%rax), %eax
cmpb %al, %cl
ja 0x3de25
incl %eax
movl $0x1, %edx
shll %cl, %edx
movl %ecx, %esi
shrl $0x3, %esi
andl $0x1c, %esi
orl %edx, -0x50(%rbp,%rsi)
incl %ecx
cmpl %ecx, %eax
jne 0x3de0c
incq %r15
cmpq %r13, %r15
jne 0x3ddf3
leaq -0x50(%rbp), %r8
movq -0x30(%rbp), %rdi
movq %r12, %rsi
movl $0x4, %edx
movl $0x8, %ecx
callq 0x3d395
addq $0x28, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_set
static void spec_set(Builder *b, int32_t argc, const Janet *argv) {
    peg_fixarity(b, argc, 1);
    Reserve r = reserve(b, 9);
    const uint8_t *str = peg_getset(b, argv[0]);
    uint32_t bitmap[8] = {0};
    for (int32_t i = 0; i < janet_string_length(str); i++)
        bitmap_set(bitmap, str[i]);
    emit_rule(r, RULE_SET, 8, bitmap);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x20, %rsp
movq %rdx, %r12
movq %rdi, %r15
movl $0x1, %edx
callq 0x3d3cd
movq %r15, %rdi
movl $0x9, %esi
callq 0x3d15c
movq %rax, %rbx
movq (%r12), %rdi
movq %rdi, %rax
shrq $0x2f, %rax
cmpl $0x1fff4, %eax          # imm = 0x1FFF4
jne 0x3def5
movq %rdx, %r14
callq 0x4ebc4
xorps %xmm0, %xmm0
movaps %xmm0, -0x30(%rbp)
movaps %xmm0, -0x40(%rbp)
movslq -0x8(%rax), %rdx
testq %rdx, %rdx
jle 0x3decf
xorl %esi, %esi
movzbl (%rax,%rsi), %ecx
movl $0x1, %edi
shll %cl, %edi
shrl $0x5, %ecx
orl %edi, -0x40(%rbp,%rcx,4)
incq %rsi
cmpq %rsi, %rdx
jne 0x3deb5
leaq -0x40(%rbp), %r8
movq %rbx, %rdi
movq %r14, %rsi
movl $0x4, %edx
movl $0x8, %ecx
callq 0x3d395
addq $0x20, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
retq
leaq 0x2a359(%rip), %rsi     # 0x68255
movq %r15, %rdi
callq 0x3d135
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_split
static void spec_split(Builder *b, int32_t argc, const Janet *argv) {
    peg_fixarity(b, argc, 2);
    Reserve r = reserve(b, 3);
    uint32_t subrule1 = peg_compile1(b, argv[0]);
    uint32_t subrule2 = peg_compile1(b, argv[1]);
    emit_2(r, RULE_SPLIT, subrule1, subrule2);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq %rdx, %rbx
movq %rdi, %r14
movl $0x2, %edx
callq 0x3d3cd
movq %r14, %rdi
movl $0x3, %esi
callq 0x3d15c
movq %rax, %r15
movq %rdx, %r12
movq (%rbx), %rsi
movq %r14, %rdi
callq 0x3cb74
movl %eax, %r13d
movq 0x8(%rbx), %rsi
movq %r14, %rdi
callq 0x3cb74
leaq -0x30(%rbp), %r8
movl %r13d, (%r8)
movl %eax, 0x4(%r8)
movq %r15, %rdi
movq %r12, %rsi
movl $0x22, %edx
movl $0x2, %ecx
callq 0x3d395
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_onerule
static void spec_onerule(Builder *b, int32_t argc, const Janet *argv, uint32_t op) {
    peg_fixarity(b, argc, 1);
    Reserve r = reserve(b, 2);
    uint32_t rule = peg_compile1(b, argv[0]);
    emit_1(r, op, rule);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movl %ecx, %ebx
movq %rdx, %r14
movq %rdi, %r15
movl $0x1, %edx
callq 0x3d3cd
movq %r15, %rdi
movl $0x2, %esi
callq 0x3d15c
movq %rax, %r12
movq %rdx, %r13
movq (%r14), %rsi
movq %r15, %rdi
callq 0x3cb74
leaq -0x2c(%rbp), %r8
movl %eax, (%r8)
movq %r12, %rdi
movq %r13, %rsi
movl %ebx, %edx
movl $0x1, %ecx
callq 0x3d395
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_tag1
static void spec_tag1(Builder *b, int32_t argc, const Janet *argv, uint32_t op) {
    peg_arity(b, argc, 0, 1);
    Reserve r = reserve(b, 2);
    uint32_t tag = (argc) ? emit_tag(b, argv[0]) : 0;
    (void) argv;
    emit_1(r, op, tag);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %ecx, -0x2c(%rbp)
movq %rdx, -0x38(%rbp)
movl %esi, %r12d
movq %rdi, %r15
xorl %r14d, %r14d
xorl %edx, %edx
movl $0x1, %ecx
callq 0x3e1ac
movq %r15, %rdi
movl $0x2, %esi
callq 0x3d15c
movq %rax, %r13
movq %rdx, %rbx
testl %r12d, %r12d
je 0x3e183
movq -0x38(%rbp), %rax
movq (%rax), %rsi
movq %r15, %rdi
callq 0x3e1fa
movl %eax, %r14d
leaq -0x3c(%rbp), %r8
movl %r14d, (%r8)
movq %r13, %rdi
movq %rbx, %rsi
movl -0x2c(%rbp), %edx
movl $0x1, %ecx
callq 0x3d395
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: peg_arity
static void peg_arity(Builder *b, int32_t arity, int32_t min, int32_t max) {
    if (min >= 0 && arity < min)
        peg_panicf(b, "arity mismatch, expected at least %d, got %d", min, arity);
    if (max >= 0 && arity > max)
        peg_panicf(b, "arity mismatch, expected at most %d, got %d", max, arity);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %rbx
pushq %rax
movl %esi, %eax
movq %rdi, %rbx
cmpl %edx, %esi
jl 0x3e1d2
testl %ecx, %ecx
sets %dl
cmpl %ecx, %eax
setle %sil
orb %dl, %sil
je 0x3e1dd
addq $0x8, %rsp
popq %rbx
popq %rbp
retq
leaq 0x164e8(%rip), %rdi     # 0x546c1
movl %edx, %esi
jmp 0x3e1e6
leaq 0x16510(%rip), %rdi     # 0x546f4
movl %ecx, %esi
movl %eax, %edx
xorl %eax, %eax
callq 0x3f652
movq %rbx, %rdi
movq %rax, %rsi
callq 0x3d135
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: emit_tag
static uint32_t emit_tag(Builder *b, Janet t) {
    if (!janet_checktype(t, JANET_KEYWORD))
        peg_panicf(b, "expected keyword for capture tag, got %v", t);
    Janet check = janet_table_get(b->tags, t);
    if (janet_checktype(check, JANET_NIL)) {
        uint32_t tag = b->nexttag++;
        if (tag > 255) {
            peg_panic(b, "too many tags - up to 255 tags are supported per peg");
        }
        Janet val = janet_wrap_number(tag);
        janet_table_put(b->tags, t, val);
        return tag;
    } else {
        return (uint32_t) janet_unwrap_number(check);
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rdi, %rbx
movq %rsi, %rax
shrq $0x2f, %rax
cmpl $0x1fff6, %eax          # imm = 0x1FFF6
jne 0x3e287
movabsq $-0x800000000000, %r15  # imm = 0xFFFF800000000000
movq 0x10(%rbx), %rdi
movq %r14, %rsi
callq 0x474e0
andq %rax, %r15
movabsq $-0x7800000000000, %rcx # imm = 0xFFF8800000000000
cmpq %rcx, %r15
jne 0x3e26f
movl 0x34(%rbx), %r15d
leal 0x1(%r15), %eax
movl %eax, 0x34(%rbx)
cmpl $0x100, %r15d           # imm = 0x100
jae 0x3e2a3
cvtsi2sd %r15d, %xmm0
callq 0x4ee44
movq 0x10(%rbx), %rdi
movq %r14, %rsi
movq %rax, %rdx
callq 0x476f0
jmp 0x3e279
movq %rax, %xmm0
cvttsd2si %xmm0, %r15
movl %r15d, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
leaq 0x29e92(%rip), %rdi     # 0x68120
movq %r14, %rsi
xorl %eax, %eax
callq 0x3f652
movq %rbx, %rdi
movq %rax, %rsi
callq 0x3d135
leaq 0x29e9f(%rip), %rsi     # 0x68149
movq %rbx, %rdi
callq 0x3d135
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_cap1
static void spec_cap1(Builder *b, int32_t argc, const Janet *argv, uint32_t op) {
    peg_arity(b, argc, 1, 2);
    Reserve r = reserve(b, 3);
    uint32_t tag = (argc == 2) ? emit_tag(b, argv[1]) : 0;
    uint32_t rule = peg_compile1(b, argv[0]);
    emit_2(r, op, rule, tag);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %ecx, -0x2c(%rbp)
movq %rdx, %r15
movl %esi, %r12d
movq %rdi, %r14
movl $0x1, %edx
movl $0x2, %ecx
callq 0x3e1ac
movq %r14, %rdi
movl $0x3, %esi
callq 0x3d15c
movq %rax, -0x38(%rbp)
movq %rdx, %r13
xorl %ebx, %ebx
cmpl $0x2, %r12d
jne 0x3e308
movq 0x8(%r15), %rsi
movq %r14, %rdi
callq 0x3e1fa
movl %eax, %ebx
movq (%r15), %rsi
movq %r14, %rdi
callq 0x3cb74
leaq -0x40(%rbp), %r8
movl %eax, (%r8)
movl %ebx, 0x4(%r8)
movq -0x38(%rbp), %rdi
movq %r13, %rsi
movl -0x2c(%rbp), %edx
movl $0x2, %ecx
callq 0x3d395
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_variadic
static void spec_variadic(Builder *b, int32_t argc, const Janet *argv, uint32_t op) {
    uint32_t rule = janet_v_count(b->bytecode);
    janet_v_push(b->bytecode, op);
    janet_v_push(b->bytecode, argc);
    for (int32_t i = 0; i < argc; i++)
        janet_v_push(b->bytecode, 0);
    for (int32_t i = 0; i < argc; i++) {
        uint32_t rulei = peg_compile1(b, argv[i]);
        b->bytecode[rule + 2 + i] = rulei;
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movl %ecx, %r12d
movq %rdx, %rbx
movl %esi, %r15d
movq %rdi, %r14
movq 0x20(%rdi), %rax
testq %rax, %rax
je 0x3e375
movl -0x4(%rax), %ecx
leal 0x2(%rcx), %r13d
leal 0x1(%rcx), %edx
cmpl -0x8(%rax), %edx
jge 0x3e37b
jmp 0x3e397
movl $0x2, %r13d
movq %rax, %rdi
movl $0x1, %esi
movl $0x4, %edx
callq 0x4b4e8
movq %rax, 0x20(%r14)
movl -0x4(%rax), %ecx
leal 0x1(%rcx), %edx
movl %edx, -0x4(%rax)
movslq %ecx, %rcx
movl %r12d, (%rax,%rcx,4)
movl -0x4(%rax), %ecx
leal 0x1(%rcx), %edx
cmpl -0x8(%rax), %edx
jl 0x3e3c8
movq %rax, %rdi
movl $0x1, %esi
movl $0x4, %edx
callq 0x4b4e8
movq %rax, 0x20(%r14)
movl -0x4(%rax), %ecx
leal 0x1(%rcx), %edx
movl %edx, -0x4(%rax)
movslq %ecx, %rcx
movl %r15d, (%rax,%rcx,4)
testl %r15d, %r15d
jle 0x3e440
movl %r15d, %r12d
movl -0x4(%rax), %ecx
leal 0x1(%rcx), %edx
cmpl -0x8(%rax), %edx
jl 0x3e401
movq %rax, %rdi
movl $0x1, %esi
movl $0x4, %edx
callq 0x4b4e8
movq %rax, 0x20(%r14)
movl -0x4(%rax), %ecx
leal 0x1(%rcx), %edx
movl %edx, -0x4(%rax)
movslq %ecx, %rcx
movl $0x0, (%rax,%rcx,4)
decl %r12d
jne 0x3e3da
testl %r15d, %r15d
jle 0x3e440
movl %r15d, %r15d
movl %r13d, %r12d
xorl %r13d, %r13d
movq (%rbx,%r13,8), %rsi
movq %r14, %rdi
callq 0x3cb74
movq 0x20(%r14), %rcx
leal (%r12,%r13), %edx
movl %eax, (%rcx,%rdx,4)
incq %r13
cmpq %r13, %r15
jne 0x3e421
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_repeater
static void spec_repeater(Builder *b, int32_t argc, const Janet *argv, int32_t min) {
    peg_fixarity(b, argc, 1);
    Reserve r = reserve(b, 4);
    uint32_t subrule = peg_compile1(b, argv[0]);
    emit_3(r, RULE_BETWEEN, min, UINT32_MAX, subrule);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %ecx, %ebx
movq %rdx, %r14
movq %rdi, %r15
movl $0x1, %edx
callq 0x3d3cd
movq %r15, %rdi
movl $0x4, %esi
callq 0x3d15c
movq %rax, %r12
movq %rdx, %r13
movq (%r14), %rsi
movq %r15, %rdi
callq 0x3cb74
leaq -0x34(%rbp), %r8
movl %ebx, (%r8)
movl $0xffffffff, 0x4(%r8)   # imm = 0xFFFFFFFF
movl %eax, 0x8(%r8)
movq %r12, %rdi
movq %r13, %rsi
movl $0xb, %edx
movl $0x3, %ecx
callq 0x3d395
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_branch
static void spec_branch(Builder *b, int32_t argc, const Janet *argv, uint32_t rule) {
    peg_fixarity(b, argc, 2);
    Reserve r = reserve(b, 3);
    uint32_t rule_a = peg_compile1(b, argv[0]);
    uint32_t rule_b = peg_compile1(b, argv[1]);
    emit_2(r, rule, rule_a, rule_b);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %ecx, -0x2c(%rbp)
movq %rdx, %r14
movq %rdi, %r15
movl $0x2, %edx
callq 0x3d3cd
movq %r15, %rdi
movl $0x3, %esi
callq 0x3d15c
movq %rax, %r12
movq %rdx, %r13
movq (%r14), %rsi
movq %r15, %rdi
callq 0x3cb74
movl %eax, %ebx
movq 0x8(%r14), %rsi
movq %r15, %rdi
callq 0x3cb74
leaq -0x34(%rbp), %r8
movl %ebx, (%r8)
movl %eax, 0x4(%r8)
movq %r12, %rdi
movq %r13, %rsi
movl -0x2c(%rbp), %edx
movl $0x2, %ecx
callq 0x3d395
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: spec_readint
static void spec_readint(Builder *b, int32_t argc, const Janet *argv, uint32_t mask) {
    peg_arity(b, argc, 1, 2);
    Reserve r = reserve(b, 3);
    uint32_t tag = (argc == 2) ? emit_tag(b, argv[1]) : 0;
    int32_t width = peg_getnat(b, argv[0]);
    if ((width < 0) || (width > JANET_MAX_READINT_WIDTH)) {
        peg_panicf(b, "width must be between 0 and %d, got %d", JANET_MAX_READINT_WIDTH, width);
    }
    emit_2(r, RULE_READINT, mask | ((uint32_t) width), tag);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movl %ecx, -0x2c(%rbp)
movq %rdx, %r13
movl %esi, %r15d
movq %rdi, %rbx
movl $0x1, %edx
movl $0x2, %ecx
callq 0x3e1ac
movq %rbx, %rdi
movl $0x3, %esi
callq 0x3d15c
movq %rax, -0x38(%rbp)
movq %rdx, %r12
xorl %r14d, %r14d
cmpl $0x2, %r15d
jne 0x3e5fe
movq 0x8(%r13), %rsi
movq %rbx, %rdi
callq 0x3e1fa
movl %eax, %r14d
movq (%r13), %rsi
movq %rbx, %rdi
callq 0x3d410
cmpl $0x9, %eax
jae 0x3e642
orl -0x2c(%rbp), %eax
leaq -0x40(%rbp), %r8
movl %eax, (%r8)
movl %r14d, 0x4(%r8)
movq -0x38(%rbp), %rdi
movq %r12, %rsi
movl $0x1b, %edx
movl $0x2, %ecx
callq 0x3d395
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x29b5c(%rip), %rdi     # 0x681a5
movl $0x8, %esi
movl %eax, %edx
xorl %eax, %eax
callq 0x3f652
movq %rbx, %rdi
movq %rax, %rsi
callq 0x3d135
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: peg_getrange
static const uint8_t *peg_getrange(Builder *b, Janet x) {
    if (!janet_checktype(x, JANET_STRING))
        peg_panic(b, "expected string for character range");
    const uint8_t *str = janet_unwrap_string(x);
    if (janet_string_length(str) != 2)
        peg_panicf(b, "expected string to have length 2, got %v", x);
    if (str[1] < str[0])
        peg_panicf(b, "range %v is empty", x);
    return str;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
movq %rdi, %rbx
movq %rsi, %rax
shrq $0x2f, %rax
cmpl $0x1fff4, %eax          # imm = 0x1FFF4
jne 0x3e697
movq %rsi, %r14
movq %rsi, %rdi
callq 0x4ebc4
cmpl $0x2, -0x8(%rax)
jne 0x3e6a6
movb 0x1(%rax), %cl
cmpb (%rax), %cl
jb 0x3e6af
popq %rbx
popq %r14
popq %rbp
retq
leaq 0x29b58(%rip), %rsi     # 0x681f6
movq %rbx, %rdi
callq 0x3d135
leaq 0x29b6d(%rip), %rdi     # 0x6821a
jmp 0x3e6b6
leaq 0x29b8d(%rip), %rdi     # 0x68243
movq %r14, %rsi
xorl %eax, %eax
callq 0x3f652
movq %rbx, %rdi
movq %rax, %rsi
callq 0x3d135
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/peg.c
// Function: pushcap
static void pushcap(PegState *s, Janet capture, uint32_t tag) {
    if (s->mode == PEG_MODE_ACCUMULATE) {
        janet_to_string_b(s->scratch, capture);
    }
    if (s->mode == PEG_MODE_NORMAL) {
        janet_array_push(s->captures, capture);
    }
    if (s->has_backref) {
        janet_array_push(s->tagged_captures, capture);
        janet_buffer_push_u8(s->tags, tag);
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl %edx, %ebx
movq %rsi, %r15
movq %rdi, %r14
movl 0x68(%rdi), %eax
cmpl $0x1, %eax
jne 0x3e6f5
movq 0x30(%r14), %rdi
movq %r15, %rsi
callq 0x3e828
movl 0x68(%r14), %eax
testl %eax, %eax
jne 0x3e705
movq 0x28(%r14), %rdi
movq %r15, %rsi
callq 0x148a3
cmpl $0x0, 0x64(%r14)
je 0x3e72e
movq 0x40(%r14), %rdi
movq %r15, %rsi
callq 0x148a3
movq 0x38(%r14), %rdi
movzbl %bl, %esi
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x17947
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: string_description_b
static void string_description_b(JanetBuffer *buffer, const char *title, void *pointer) {
    janet_buffer_ensure(buffer, buffer->count + BUFSIZE, 2);
    uint8_t *c = buffer->data + buffer->count;
    int32_t i;
    union {
        uint8_t bytes[sizeof(void *)];
        void *p;
    } pbuf;

    pbuf.p = pointer;
    *c++ = '<';
    /* Maximum of 32 bytes for abstract type name */
    for (i = 0; i < 32 && title[i]; ++i)
        *c++ = ((uint8_t *)title) [i];
    *c++ = ' ';
    *c++ = '0';
    *c++ = 'x';
#if defined(JANET_64)
#define POINTSIZE 6
#else
#define POINTSIZE (sizeof(void *))
#endif
    for (i = POINTSIZE; i > 0; --i) {
        uint8_t byte = pbuf.bytes[i - 1];
        *c++ = HEX(byte >> 4);
        *c++ = HEX(byte & 0xF);
    }
    *c++ = '>';
    buffer->count = (int32_t)(c - buffer->data);
#undef POINTSIZE
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rdx, %r15
movq %rsi, %r14
movq %rdi, %rbx
movl 0x10(%rdi), %esi
addl $0x40, %esi
movl $0x2, %edx
callq 0x1771e
movq 0x18(%rbx), %rax
movslq 0x10(%rbx), %rdx
movq %r15, -0x20(%rbp)
leaq (%rax,%rdx), %rcx
incq %rcx
movb $0x3c, -0x1(%rcx)
movb (%r14), %sil
testb %sil, %sil
je 0x3eb3b
xorl %edx, %edx
movq %rcx, %rax
movb %sil, (%rcx)
cmpq $0x1f, %rdx
je 0x3eb35
leaq 0x1(%rax), %rcx
movb 0x1(%r14,%rdx), %sil
incq %rdx
testb %sil, %sil
jne 0x3eb18
leaq 0x1(%rax), %rcx
jmp 0x3eb3e
addq %rdx, %rax
movb $0x20, (%rcx)
movw $0x7830, 0x2(%rax)      # imm = 0x7830
leaq 0x4(%rax), %rcx
addl $0x5, %eax
movl $0x7, %edx
leaq 0x2ca46(%rip), %rsi     # 0x6b5a0
movzbl -0x22(%rbp,%rdx), %edi
movl %edi, %r8d
shrl $0x4, %r8d
movb (%rsi,%r8), %r8b
movb %r8b, (%rcx)
andl $0xf, %edi
movb (%rsi,%rdi), %dil
movb %dil, 0x1(%rcx)
addq $0x2, %rcx
decq %rdx
addl $0x2, %eax
cmpq $0x1, %rdx
ja 0x3eb5a
movb $0x3e, (%rcx)
subl 0x18(%rbx), %eax
movl %eax, 0x10(%rbx)
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: janet_description_b
void janet_description_b(JanetBuffer *buffer, Janet x) {
    switch (janet_type(x)) {
        default:
            break;
        case JANET_NIL:
            janet_buffer_push_cstring(buffer, "nil");
            return;
        case JANET_KEYWORD:
            janet_buffer_push_u8(buffer, ':');
            break;
        case JANET_STRING:
            janet_escape_string_b(buffer, janet_unwrap_string(x));
            return;
        case JANET_BUFFER: {
            JanetBuffer *b = janet_unwrap_buffer(x);
            janet_escape_buffer_b(buffer, b);
            return;
        }
        case JANET_ABSTRACT: {
            JanetAbstract p = janet_unwrap_abstract(x);
            const JanetAbstractType *t = janet_abstract_type(p);
            if (t->tostring != NULL) {
                janet_buffer_push_cstring(buffer, "<");
                janet_buffer_push_cstring(buffer, t->name);
                janet_buffer_push_cstring(buffer, " ");
                t->tostring(p, buffer);
                janet_buffer_push_cstring(buffer, ">");
            } else {
                string_description_b(buffer, t->name, p);
            }
            return;
        }
    }
    janet_to_string_b(buffer, x);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rsi, %r14
movq %rsi, %xmm0
movq %rsi, %rcx
shrq $0x2f, %rcx
andl $0xf, %ecx
xorl %eax, %eax
ucomisd %xmm0, %xmm0
movq %rdi, %rbx
cmovpl %ecx, %eax
cmpl $0x5, %eax
jle 0x3ec3d
cmpl $0x6, %eax
je 0x3ec5e
cmpl $0xb, %eax
je 0x3ec80
cmpl $0xe, %eax
jne 0x3ec6b
movq %r14, %rdi
callq 0x4ebc4
movq %rax, %r14
movq -0x10(%rax), %r15
cmpq $0x0, 0x38(%r15)
je 0x3eceb
leaq 0x2d0b0(%rip), %rsi     # 0x6bcb5
movq %rbx, %rdi
callq 0x17878
movq (%r15), %rsi
movq %rbx, %rdi
callq 0x17878
leaq 0x28999(%rip), %rsi     # 0x675b8
movq %rbx, %rdi
callq 0x17878
movq %r14, %rdi
movq %rbx, %rsi
callq *0x38(%r15)
leaq 0x2944c(%rip), %rsi     # 0x68084
jmp 0x3ecd9
cmpl $0x1, %eax
je 0x3ecd2
cmpl $0x4, %eax
jne 0x3ec6b
movq %r14, %rdi
callq 0x4ebc4
movl -0x8(%rax), %edx
movq %rbx, %rdi
movq %rax, %rsi
jmp 0x3ecc3
movq %rbx, %rdi
movl $0x3a, %esi
callq 0x17947
movq %rbx, %rdi
movq %r14, %rsi
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x3e828
movq %r14, %rdi
callq 0x4ebc4
movq %rax, %r14
cmpq %rbx, %rax
jne 0x3ecab
movl 0x10(%r14), %eax
leal (%rax,%rax,2), %eax
leal 0x3(,%rax,2), %esi
movq %r14, %rdi
movl $0x1, %edx
callq 0x1771e
movq %rbx, %rdi
movl $0x40, %esi
callq 0x17947
movq 0x18(%r14), %rsi
movl 0x10(%r14), %edx
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x3fb2e
leaq 0x1f9ed(%rip), %rsi     # 0x5e6c6
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x17878
movq (%r15), %rsi
movq %rbx, %rdi
movq %r14, %rdx
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x3ead4
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: janet_description
const uint8_t *janet_description(Janet x) {
    JanetBuffer b;
    janet_buffer_init(&b, 10);
    janet_description_b(&b, x);
    const uint8_t *ret = janet_string(b.data, b.count);
    janet_buffer_deinit(&b);
    return ret;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
subq $0x20, %rsp
movq %rdi, %rbx
leaq -0x30(%rbp), %r14
movq %r14, %rdi
movl $0xa, %esi
callq 0x17618
movq %r14, %rdi
movq %rbx, %rsi
callq 0x3eb9c
movq 0x18(%r14), %rdi
movl 0x10(%r14), %esi
callq 0x44754
movq %rax, %rbx
movq %r14, %rdi
callq 0x176e1
movq %rbx, %rax
addq $0x20, %rsp
popq %rbx
popq %r14
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: janet_to_string
const uint8_t *janet_to_string(Janet x) {
    switch (janet_type(x)) {
        default: {
            JanetBuffer b;
            janet_buffer_init(&b, 10);
            janet_to_string_b(&b, x);
            const uint8_t *ret = janet_string(b.data, b.count);
            janet_buffer_deinit(&b);
            return ret;
        }
        case JANET_BUFFER:
            return janet_string(janet_unwrap_buffer(x)->data, janet_unwrap_buffer(x)->count);
        case JANET_STRING:
        case JANET_SYMBOL:
        case JANET_KEYWORD:
            return janet_unwrap_string(x);
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
subq $0x20, %rsp
movq %rdi, %rbx
movq %rdi, %xmm0
movq %rdi, %rcx
shrq $0x2f, %rcx
andl $0xf, %ecx
xorl %eax, %eax
ucomisd %xmm0, %xmm0
cmovpl %ecx, %eax
leal -0x4(%rax), %ecx
cmpl $0x3, %ecx
jae 0x3ed8f
movq %rbx, %rdi
addq $0x20, %rsp
popq %rbx
popq %r14
popq %rbp
jmp 0x4ebc4
cmpl $0xb, %eax
jne 0x3edbb
movq %rbx, %rdi
callq 0x4ebc4
movq 0x18(%rax), %r14
movq %rbx, %rdi
callq 0x4ebc4
movl 0x10(%rax), %esi
movq %r14, %rdi
addq $0x20, %rsp
popq %rbx
popq %r14
popq %rbp
jmp 0x44754
leaq -0x30(%rbp), %r14
movq %r14, %rdi
movl $0xa, %esi
callq 0x17618
movq %r14, %rdi
movq %rbx, %rsi
callq 0x3e828
movq 0x18(%r14), %rdi
movl 0x10(%r14), %esi
callq 0x44754
movq %rax, %rbx
movq %r14, %rdi
callq 0x176e1
movq %rbx, %rax
addq $0x20, %rsp
popq %rbx
popq %r14
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: janet_pretty_
static JanetBuffer *janet_pretty_(JanetBuffer *buffer, int depth, int flags, Janet x, int32_t startlen) {
    struct pretty S;
    if (NULL == buffer) {
        buffer = janet_buffer(0);
    }
    S.buffer = buffer;
    S.depth = depth;
    S.indent = 0;
    S.flags = flags;
    S.bufstartlen = startlen;
    S.keysort_capacity = 0;
    S.keysort_buffer = NULL;
    S.keysort_start = 0;
    janet_table_init(&S.seen, 10);
    janet_pretty_one(&S, x, 0);
    janet_table_deinit(&S.seen);
    return S.buffer;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x58, %rsp
movl %r8d, %r14d
movq %rcx, %rbx
movl %edx, %r15d
movl %esi, %r12d
testq %rdi, %rdi
jne 0x3ee3f
xorl %edi, %edi
callq 0x176f7
movq %rax, %rdi
leaq -0x58(%rbp), %r13
movq %rdi, -0x28(%r13)
movl %r12d, -0x20(%r13)
movl $0x0, -0x1c(%r13)
movl %r15d, -0x18(%r13)
movl %r14d, -0x14(%r13)
xorps %xmm0, %xmm0
movups %xmm0, -0x10(%r13)
movq %r13, %rdi
movl $0xa, %esi
callq 0x47380
leaq -0x80(%rbp), %r14
movq %r14, %rdi
movq %rbx, %rsi
xorl %edx, %edx
callq 0x3fc90
movq %r13, %rdi
callq 0x4740b
movq (%r14), %rax
addq $0x58, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: janet_jdn_
static JanetBuffer *janet_jdn_(JanetBuffer *buffer, int depth, Janet x, int32_t startlen) {
    struct pretty S;
    if (NULL == buffer) {
        buffer = janet_buffer(0);
    }
    S.buffer = buffer;
    S.depth = depth;
    S.indent = 0;
    S.flags = 0;
    S.bufstartlen = startlen;
    S.keysort_capacity = 0;
    S.keysort_buffer = NULL;
    S.keysort_start = 0;
    janet_table_init(&S.seen, 10);
    int res = print_jdn_one(&S, x, depth);
    janet_table_deinit(&S.seen);
    if (res) {
        janet_panic("could not print to jdn format");
    }
    return S.buffer;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x60, %rsp
movl %ecx, %r15d
movq %rdx, %r14
movl %esi, %ebx
testq %rdi, %rdi
jne 0x3eed7
xorl %edi, %edi
callq 0x176f7
movq %rax, %rdi
leaq -0x50(%rbp), %r12
movq %rdi, -0x28(%r12)
movl %ebx, -0x20(%r12)
movq $0x0, -0x1c(%r12)
movl %r15d, -0x14(%r12)
xorps %xmm0, %xmm0
movups %xmm0, -0x10(%r12)
movq %r12, %rdi
movl $0xa, %esi
callq 0x47380
leaq -0x78(%rbp), %rdi
movq %r14, %rsi
movl %ebx, %edx
callq 0x4047b
movl %eax, %ebx
movq %r12, %rdi
callq 0x4740b
testl %ebx, %ebx
jne 0x3ef36
movq -0x78(%rbp), %rax
addq $0x60, %rsp
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
retq
leaq 0x29773(%rip), %rdi     # 0x686b0
callq 0x191a3
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/pp.c
// Function: print_newline
static void print_newline(struct pretty *S, int just_a_space) {
    int i;
    if (just_a_space || (S->flags & JANET_PRETTY_ONELINE)) {
        janet_buffer_push_u8(S->buffer, ' ');
        return;
    }
    janet_buffer_push_u8(S->buffer, '\n');
    for (i = 0; i < S->indent; i++) {
        janet_buffer_push_u8(S->buffer, ' ');
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
movq %rdi, %rbx
testl %esi, %esi
jne 0x4046a
testb $0x2, 0x10(%rbx)
jne 0x4046a
movq (%rbx), %rdi
movl $0xa, %esi
callq 0x17947
cmpl $0x0, 0xc(%rbx)
jle 0x40465
xorl %r14d, %r14d
movq (%rbx), %rdi
movl $0x20, %esi
callq 0x17947
incl %r14d
cmpl 0xc(%rbx), %r14d
jl 0x4044f
popq %rbx
popq %r14
popq %rbp
retq
movq (%rbx), %rdi
movl $0x20, %esi
popq %rbx
popq %r14
popq %rbp
jmp 0x17947
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/regalloc.c
// Function: janetc_regalloc_clone
void janetc_regalloc_clone(JanetcRegisterAllocator *dest, JanetcRegisterAllocator *src) {
    size_t size;
    dest->count = src->count;
    dest->capacity = src->capacity;
    dest->max = src->max;
    size = sizeof(uint32_t) * (size_t) dest->capacity;
    dest->regtemps = 0;
    if (size) {
        dest->chunks = janet_malloc(size);
        if (!dest->chunks) {
            JANET_OUT_OF_MEMORY;
        }
        memcpy(dest->chunks, src->chunks, size);
    } else {
        dest->chunks = NULL;
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %r15
movl 0x8(%rsi), %eax
movl %eax, 0x8(%rdi)
movslq 0xc(%rsi), %r14
movl %r14d, 0xc(%rdi)
movl 0x10(%rsi), %eax
movl %eax, 0x10(%rdi)
movl $0x0, 0x14(%rdi)
testq %r14, %r14
je 0x40995
movq %rsi, %rbx
shlq $0x2, %r14
movq %r14, %rdi
callq 0x12760
movq %rax, (%r15)
testq %rax, %rax
je 0x409a7
movq (%rbx), %rsi
movq %rax, %rdi
movq %r14, %rdx
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x12670
movq $0x0, (%r15)
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
callq 0x13ea0
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/regalloc.c
// Function: janetc_regalloc_touch
void janetc_regalloc_touch(JanetcRegisterAllocator *ra, int32_t reg) {
    int32_t chunk = reg >> 5;
    int32_t bit = reg & 0x1F;
    while (chunk >= ra->count) pushchunk(ra);
    ra->chunks[chunk] |= ithbit(bit);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl %esi, %r14d
movq %rdi, %rbx
movl %esi, %r15d
sarl $0x5, %r15d
cmpl 0x8(%rdi), %r15d
jl 0x409d7
movq %rbx, %rdi
callq 0x409f5
cmpl 0x8(%rbx), %r15d
jge 0x409c9
movl $0x1, %eax
movl %r14d, %ecx
shll %cl, %eax
movq (%rbx), %rcx
movslq %r15d, %rdx
orl %eax, (%rcx,%rdx,4)
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/regalloc.c
// Function: pushchunk
static void pushchunk(JanetcRegisterAllocator *ra) {
    /* Registers 240-255 are always allocated (reserved) */
    uint32_t chunk = ra->count == 7 ? 0xFFFF0000 : 0;
    int32_t newcount = ra->count + 1;
    if (newcount > ra->capacity) {
        int32_t newcapacity = newcount * 2;
        ra->chunks = janet_realloc(ra->chunks, (size_t) newcapacity * sizeof(uint32_t));
        if (!ra->chunks) {
            JANET_OUT_OF_MEMORY;
        }
        ra->capacity = newcapacity;
    }
    ra->chunks[ra->count] = chunk;
    ra->count = newcount;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movq %rdi, %rbx
movslq 0x8(%rdi), %r15
movq %r15, %r14
incq %r14
movq (%rdi), %rax
cmpl 0xc(%rdi), %r15d
jge 0x40a1a
movl %r15d, %ecx
jmp 0x40a3c
leaq (,%r14,8), %rsi
movq %rax, %rdi
callq 0x12840
movq %rax, (%rbx)
testq %rax, %rax
je 0x40a63
leal (%r14,%r14), %ecx
movl %ecx, 0xc(%rbx)
movl 0x8(%rbx), %ecx
xorl %edx, %edx
cmpl $0x7, %r15d
setne %dl
shll $0x10, %edx
addl $0xffff0000, %edx       # imm = 0xFFFF0000
movslq %ecx, %rcx
movl %edx, (%rax,%rcx,4)
movl %r14d, 0x8(%rbx)
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
callq 0x13ece
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/regalloc.c
// Function: janetc_regalloc_1
int32_t janetc_regalloc_1(JanetcRegisterAllocator *ra) {
    /* Get the nth bit in the array */
    int32_t bit, chunk, nchunks, reg;
    bit = -1;
    nchunks = ra->count;
    for (chunk = 0; chunk < nchunks; chunk++) {
        uint32_t block = ra->chunks[chunk];
        if (block == 0xFFFFFFFF) continue;
        bit = count_trailing_ones(block);
        break;
    }
    /* No reg found */
    if (bit == -1) {
        pushchunk(ra);
        bit = 0;
        chunk = nchunks;
    }
    /* set the bit at index bit in chunk */
    ra->chunks[chunk] |= ithbit(bit);
    reg = (chunk << 5) + bit;
    if (reg > ra->max)
        ra->max = reg;
    return reg;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
movq %rdi, %rbx
movslq 0x8(%rdi), %r14
testq %r14, %r14
jle 0x40a90
movq (%rbx), %rcx
xorl %eax, %eax
movl (%rcx,%rax,4), %edx
cmpl $-0x1, %edx
jne 0x40a9c
incq %rax
cmpq %rax, %r14
jne 0x40a80
movq %rbx, %rdi
callq 0x409f5
xorl %ecx, %ecx
jmp 0x40aa4
notl %edx
bsfl %edx, %ecx
movl %eax, %r14d
movl $0x1, %edx
shll %cl, %edx
movq (%rbx), %rsi
movslq %r14d, %rax
orl %edx, (%rsi,%rax,4)
shll $0x5, %eax
orl %ecx, %eax
cmpl 0x10(%rbx), %eax
jle 0x40ac1
movl %eax, 0x10(%rbx)
popq %rbx
popq %r14
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/regalloc.c
// Function: janetc_regalloc_check
int janetc_regalloc_check(JanetcRegisterAllocator *ra, int32_t reg) {
    int32_t chunk = reg >> 5;
    int32_t bit = reg & 0x1F;
    while (chunk >= ra->count) pushchunk(ra);
    return !!(ra->chunks[chunk] & ithbit(bit));
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl %esi, %ebx
movq %rdi, %r14
movl %esi, %r15d
sarl $0x5, %r15d
cmpl 0x8(%rdi), %r15d
jl 0x40b0c
movq %r14, %rdi
callq 0x409f5
cmpl 0x8(%r14), %r15d
jge 0x40afe
movq (%r14), %rax
movslq %r15d, %rcx
movl (%rax,%rcx,4), %ecx
xorl %eax, %eax
btl %ebx, %ecx
setb %al
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/regalloc.c
// Function: janetc_regalloc_temp
int32_t janetc_regalloc_temp(JanetcRegisterAllocator *ra, JanetcRegisterTemp nth) {
    int32_t oldmax = ra->max;
    if (ra->regtemps & (1 << nth)) {
        JANET_EXIT("regtemp already allocated");
    }
    ra->regtemps |= 1 << nth;
    int32_t reg = janetc_regalloc_1(ra);
    if (reg > 0xFF) {
        reg = 0xF0 + nth;
        ra->max = (reg > oldmax) ? reg : oldmax;
    }
    return reg;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl %esi, %ebx
movl 0x14(%rdi), %eax
movl $0x1, %edx
movl %ebx, %ecx
shll %cl, %edx
btl %esi, %eax
jb 0x40b7b
movq %rdi, %r14
movl 0x10(%rdi), %r15d
orl %edx, %eax
movl %eax, 0x14(%rdi)
callq 0x40a68
cmpl $0x100, %eax            # imm = 0x100
jl 0x40b70
addl $0xf0, %ebx
cmpl %r15d, %ebx
cmovgl %ebx, %r15d
movl %r15d, 0x10(%r14)
movl %ebx, %eax
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
callq 0x13efc
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/run.c
// Function: janet_loop_fiber
int janet_loop_fiber(JanetFiber *fiber) {
    int status;
#ifdef JANET_EV
    janet_schedule(fiber, janet_wrap_nil());
    janet_loop();
    status = janet_fiber_status(fiber);
#else
    Janet out;
    status = janet_continue(fiber, janet_wrap_nil(), &out);
    if (status != JANET_SIGNAL_OK && status != JANET_SIGNAL_EVENT) {
        janet_stacktrace_ext(fiber, out, "");
    }
#endif
    return status;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %rbx
pushq %rax
movq %rdi, %rbx
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %rbx, %rdi
movq %rax, %rsi
callq 0x2298f
callq 0x24ef2
movq %rbx, %rdi
addq $0x8, %rsp
popq %rbx
popq %rbp
jmp 0x2996f
nopl (%rax)
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/specials.c
// Function: janetc_def
static JanetSlot janetc_def(JanetFopts opts, int32_t argn, const Janet *argv) {
    JanetCompiler *c = opts.compiler;
    JanetTable *attr_table = handleattr(c, "def", argn, argv);
    if (c->result.status == JANET_COMPILE_ERROR) {
        return janetc_cslot(janet_wrap_nil());
    }
    opts.flags &= ~JANET_FOPTS_HINT;
    SlotHeadPair *into = NULL;
    into = dohead_destructure(c, into, opts, argv[0], argv[argn - 1]);
    if (c->result.status == JANET_COMPILE_ERROR) {
        janet_v_free(into);
        return janetc_cslot(janet_wrap_nil());
    }
    JanetSlot ret;
    janet_assert(janet_v_count(into) > 0, "bad destructure");
    for (int32_t i = 0; i < janet_v_count(into); i++) {
        destructure(c, into[i].lhs, into[i].rhs, defleaf, attr_table);
        ret = into[i].rhs;
    }
    janet_v_free(into);
    return ret;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x38, %rsp
movq %rdx, %r12
movl %esi, %r13d
movq %rdi, %rbx
movq 0x10(%rbp), %r15
leaq 0x27766(%rip), %rsi     # 0x68b1d
movq %r15, %rdi
movl %r13d, %edx
movq %r12, %rcx
callq 0x42fc8
cmpl $0x1, 0x48(%r15)
je 0x41425
movq %rax, %r14
leaq 0x10(%rbp), %rax
andb $-0x3, 0x22(%rax)
movslq %r13d, %rcx
movq (%r12), %rdx
movq -0x8(%r12,%rcx,8), %rcx
movq 0x20(%rax), %rsi
movq %rsi, 0x20(%rsp)
movups (%rax), %xmm0
movups 0x10(%rax), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
movq %r15, %rdi
xorl %esi, %esi
callq 0x40fb0
movq %rax, -0x30(%rbp)
cmpl $0x1, 0x48(%r15)
jne 0x41447
cmpq $0x0, -0x30(%rbp)
je 0x41425
movq -0x30(%rbp), %rdi
addq $-0x8, %rdi
callq 0x2bcd9
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %rbx, %rdi
movq %rax, %rsi
callq 0x1baf6
movq %rbx, %rax
jmp 0x414cc
cmpq $0x0, -0x30(%rbp)
je 0x414db
movq -0x30(%rbp), %rax
cmpl $0x0, -0x4(%rax)
jle 0x414db
movq %rbx, %r12
movq %r15, %rbx
movq -0x30(%rbp), %rax
leaq 0x8(%rax), %r13
xorl %r15d, %r15d
movq -0x8(%r13), %rsi
movq 0x10(%r13), %rax
movq %rax, 0x10(%rsp)
movups (%r13), %xmm0
movups %xmm0, (%rsp)
movq %rbx, %rdi
leaq 0x23f4(%rip), %rdx      # 0x43881
movq %r14, %rcx
callq 0x43160
movq 0x10(%r13), %rax
movq %rax, 0x10(%r12)
movups (%r13), %xmm0
movups %xmm0, (%r12)
incq %r15
movq -0x30(%rbp), %rax
movslq -0x4(%rax), %rax
addq $0x20, %r13
cmpq %rax, %r15
jl 0x4146d
movq -0x30(%rbp), %rdi
addq $-0x8, %rdi
callq 0x2bcd9
movq %r12, %rax
addq $0x38, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
callq 0x13f30
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/specials.c
// Function: janetc_do
static JanetSlot janetc_do(JanetFopts opts, int32_t argn, const Janet *argv) {
    int32_t i;
    JanetSlot ret = janetc_cslot(janet_wrap_nil());
    JanetCompiler *c = opts.compiler;
    JanetFopts subopts = janetc_fopts_default(c);
    JanetScope tempscope;
    janetc_scope(&tempscope, c, 0, "do");
    for (i = 0; i < argn; i++) {
        if (i != argn - 1) {
            subopts.flags = JANET_FOPTS_DROP;
        } else {
            subopts = opts;
            subopts.flags &= ~JANET_FOPTS_ACCEPT_SPLICE;
        }
        ret = janetc_value(subopts, argv[i]);
        if (i != argn - 1) {
            janetc_freeslot(c, ret);
        }
    }
    janetc_popscope_keepslot(c, ret);
    return ret;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xe8, %rsp
movq %rdx, %r14
movl %esi, %r12d
movq %rdi, %rbx
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %rbx, %rdi
movq %rax, %rsi
callq 0x1baf6
movq 0x10(%rbp), %r15
leaq -0x60(%rbp), %rdi
movq %r15, %rsi
callq 0x1ba98
leaq 0x272ca(%rip), %rcx     # 0x687f8
leaq -0xe8(%rbp), %rdi
movq %r15, -0x30(%rbp)
movq %r15, %rsi
xorl %edx, %edx
callq 0x1be43
testl %r12d, %r12d
jle 0x41615
leal -0x1(%r12), %r15d
movl %r12d, %r12d
xorl %r13d, %r13d
cmpq %r13, %r15
jne 0x415b3
leaq 0x10(%rbp), %rcx
movq 0x20(%rcx), %rax
movq %rax, -0x40(%rbp)
movups (%rcx), %xmm0
movups 0x10(%rcx), %xmm1
movaps %xmm1, -0x50(%rbp)
movaps %xmm0, -0x60(%rbp)
andb $-0x9, -0x3e(%rbp)
movq (%r14,%r13,8), %rsi
movq -0x40(%rbp), %rax
movq %rax, 0x20(%rsp)
movaps -0x60(%rbp), %xmm0
movaps -0x50(%rbp), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
leaq -0x78(%rbp), %rdi
callq 0x1c7be
movq -0x68(%rbp), %rax
movq %rax, 0x10(%rbx)
movups -0x78(%rbp), %xmm0
movups %xmm0, (%rbx)
jmp 0x41609
movl $0x40000, -0x40(%rbp)   # imm = 0x40000
movq (%r14,%r13,8), %rsi
movq -0x40(%rbp), %rax
movq %rax, 0x20(%rsp)
movups -0x60(%rbp), %xmm0
movups -0x50(%rbp), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
leaq -0x78(%rbp), %rdi
callq 0x1c7be
movq -0x68(%rbp), %rax
movq %rax, 0x10(%rbx)
movups -0x78(%rbp), %xmm0
movups %xmm0, (%rbx)
movq 0x10(%rbx), %rax
movq %rax, 0x10(%rsp)
movups (%rbx), %xmm0
movups %xmm0, (%rsp)
movq -0x30(%rbp), %rdi
callq 0x1bd19
incq %r13
cmpq %r13, %r12
jne 0x41557
movq 0x10(%rbx), %rax
movq %rax, 0x10(%rsp)
movups (%rbx), %xmm0
movups %xmm0, (%rsp)
movq -0x30(%rbp), %rdi
callq 0x1c10a
movq %rbx, %rax
addq $0xe8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/specials.c
// Function: janetc_quasiquote
static JanetSlot janetc_quasiquote(JanetFopts opts, int32_t argn, const Janet *argv) {
    if (argn != 1) {
        janetc_cerror(opts.compiler, "expected 1 argument to quasiquote");
        return janetc_cslot(janet_wrap_nil());
    }
    return quasiquote(opts, argv[0], JANET_RECURSION_GUARD, 0);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %rbx
subq $0x28, %rsp
movq %rdi, %rbx
leaq 0x10(%rbp), %rax
cmpl $0x1, %esi
jne 0x42479
movq (%rdx), %rsi
movq 0x20(%rax), %rcx
movq %rcx, 0x20(%rsp)
movups (%rax), %xmm0
movups 0x10(%rax), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
movq %rbx, %rdi
movl $0x400, %edx            # imm = 0x400
xorl %ecx, %ecx
callq 0x43e26
jmp 0x424a2
movq (%rax), %rdi
leaq 0x266cf(%rip), %rsi     # 0x68b52
callq 0x1bb46
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %rbx, %rdi
movq %rax, %rsi
callq 0x1baf6
movq %rbx, %rax
addq $0x28, %rsp
popq %rbx
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/specials.c
// Function: janetc_quote
static JanetSlot janetc_quote(JanetFopts opts, int32_t argn, const Janet *argv) {
    if (argn != 1) {
        janetc_cerror(opts.compiler, "expected 1 argument to quote");
        return janetc_cslot(janet_wrap_nil());
    }
    return janetc_cslot(argv[0]);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %rbx
pushq %rax
movq %rdi, %rbx
cmpl $0x1, %esi
jne 0x424bf
movq (%rdx), %rsi
jmp 0x424e4
leaq 0x10(%rbp), %rax
movq (%rax), %rdi
leaq 0x266c4(%rip), %rsi     # 0x68b91
callq 0x1bb46
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %rax, %rsi
movq %rbx, %rdi
callq 0x1baf6
movq %rbx, %rax
addq $0x8, %rsp
popq %rbx
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/specials.c
// Function: janetc_splice
static JanetSlot janetc_splice(JanetFopts opts, int32_t argn, const Janet *argv) {
    JanetSlot ret;
    if (!(opts.flags & JANET_FOPTS_ACCEPT_SPLICE)) {
        janetc_cerror(opts.compiler, "splice can only be used in function parameters and data constructors, it has no effect here");
        return janetc_cslot(janet_wrap_nil());
    }
    if (argn != 1) {
        janetc_cerror(opts.compiler, "expected 1 argument to splice");
        return janetc_cslot(janet_wrap_nil());
    }
    ret = janetc_value(opts, argv[0]);
    ret.flags |= JANET_SLOT_SPLICED;
    return ret;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
subq $0x40, %rsp
movq %rdi, %rbx
leaq 0x10(%rbp), %rax
testb $0x8, 0x22(%rax)
jne 0x4274c
movq (%rax), %rdi
leaq 0x264ec(%rip), %rsi     # 0x68c36
jmp 0x4279f
cmpl $0x1, %esi
jne 0x42795
movq (%rdx), %rsi
movq 0x20(%rax), %rcx
movq %rcx, 0x20(%rsp)
movups (%rax), %xmm0
movups 0x10(%rax), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
leaq -0x28(%rbp), %r14
movq %r14, %rdi
callq 0x1c7be
movups (%r14), %xmm0
movups %xmm0, (%rbx)
movl $0x1000000, %eax        # imm = 0x1000000
orl 0x10(%r14), %eax
movl 0x14(%r14), %ecx
movl %eax, 0x10(%rbx)
movl %ecx, 0x14(%rbx)
jmp 0x427be
movq (%rax), %rdi
leaq 0x264f3(%rip), %rsi     # 0x68c92
callq 0x1bb46
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %rbx, %rdi
movq %rax, %rsi
callq 0x1baf6
movq %rbx, %rax
addq $0x40, %rsp
popq %rbx
popq %r14
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O3/janet-lang[P]janet/src/core/specials.c
// Function: janetc_upscope
static JanetSlot janetc_upscope(JanetFopts opts, int32_t argn, const Janet *argv) {
    int32_t i;
    JanetSlot ret = janetc_cslot(janet_wrap_nil());
    JanetCompiler *c = opts.compiler;
    JanetFopts subopts = janetc_fopts_default(c);
    for (i = 0; i < argn; i++) {
        if (i != argn - 1) {
            subopts.flags = JANET_FOPTS_DROP;
        } else {
            subopts = opts;
            subopts.flags &= ~JANET_FOPTS_ACCEPT_SPLICE;
        }
        ret = janetc_value(subopts, argv[i]);
        if (i != argn - 1) {
            janetc_freeslot(c, ret);
        }
    }
    return ret;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x78, %rsp
movq %rdx, %rbx
movl %esi, %r12d
movq %rdi, %r14
movabsq $-0x77fffffffffff, %rdi # imm = 0xFFF8800000000001
callq 0x4ece6
movq %r14, %rdi
movq %rax, %rsi
callq 0x1baf6
movq 0x10(%rbp), %rsi
leaq -0x50(%rbp), %rdi
movq %rsi, -0x58(%rbp)
callq 0x1ba98
testl %r12d, %r12d
jle 0x42921
leal -0x1(%r12), %r15d
movl %r12d, %r12d
xorl %r13d, %r13d
cmpq %r13, %r15
jne 0x428bd
leaq 0x10(%rbp), %rcx
movq 0x20(%rcx), %rax
movq %rax, -0x30(%rbp)
movups (%rcx), %xmm0
movups 0x10(%rcx), %xmm1
movaps %xmm1, -0x40(%rbp)
movaps %xmm0, -0x50(%rbp)
andb $-0x9, -0x2e(%rbp)
movq (%rbx,%r13,8), %rsi
movq -0x30(%rbp), %rax
movq %rax, 0x20(%rsp)
movaps -0x50(%rbp), %xmm0
movaps -0x40(%rbp), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
leaq -0x70(%rbp), %rdi
callq 0x1c7be
movq -0x60(%rbp), %rax
movq %rax, 0x10(%r14)
movups -0x70(%rbp), %xmm0
movups %xmm0, (%r14)
jmp 0x42915
movl $0x40000, -0x30(%rbp)   # imm = 0x40000
movq (%rbx,%r13,8), %rsi
movq -0x30(%rbp), %rax
movq %rax, 0x20(%rsp)
movups -0x50(%rbp), %xmm0
movups -0x40(%rbp), %xmm1
movups %xmm1, 0x10(%rsp)
movups %xmm0, (%rsp)
leaq -0x70(%rbp), %rdi
callq 0x1c7be
movq -0x60(%rbp), %rax
movq %rax, 0x10(%r14)
movups -0x70(%rbp), %xmm0
movups %xmm0, (%r14)
movq 0x10(%r14), %rax
movq %rax, 0x10(%rsp)
movups (%r14), %xmm0
movups %xmm0, (%rsp)
movq -0x58(%rbp), %rdi
callq 0x1bd19
incq %r13
cmpq %r13, %r12
jne 0x42860
movq %r14, %rax
addq $0x78, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq