// File: /workspace/github_c_makefile_star2_O0/janet-lang[P]janet/src/core/strtod.c
// Function: janet_scan_numeric
int janet_scan_numeric(
    const uint8_t *str,
    int32_t len,
    Janet *out) {
    int result;
    double num;
    int64_t i64 = 0;
    uint64_t u64 = 0;
    if (len < 2 || str[len - 2] != ':') {
        result = janet_scan_number_base(str, len, 0, &num);
        *out = janet_wrap_number(num);
        return result;
    }
    switch (str[len - 1]) {
        default:
            return 1;
        case 'n':
            result = janet_scan_number_base(str, len - 2, 0, &num);
            *out = janet_wrap_number(num);
            return result;
        /* Condition is inverted janet_scan_int64 and janet_scan_uint64 */
        case 's':
            result = !janet_scan_int64(str, len - 2, &i64);
            *out = janet_wrap_s64(i64);
            return result;
        case 'u':
            result = !janet_scan_uint64(str, len - 2, &u64);
            *out = janet_wrap_u64(u64);
            return result;
    }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x90, %rsp
movq %rdi, -0x10(%rbp)
movl %esi, -0x14(%rbp)
movq %rdx, -0x20(%rbp)
movq $0x0, -0x38(%rbp)
movq $0x0, -0x40(%rbp)
cmpl $0x2, -0x14(%rbp)
jl 0x67082
movq -0x10(%rbp), %rax
movl -0x14(%rbp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movzbl (%rax,%rcx), %eax
cmpl $0x3a, %eax
je 0x670c6
movq -0x10(%rbp), %rdi
movl -0x14(%rbp), %esi
xorl %edx, %edx
leaq -0x30(%rbp), %rcx
callq 0x662c0
movl %eax, -0x24(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0x68(%rbp)
movsd -0x30(%rbp), %xmm0
callq 0x7b820
movq %rax, %rcx
movq -0x68(%rbp), %rax
movq %rcx, -0x48(%rbp)
movq -0x48(%rbp), %rcx
movq %rcx, (%rax)
movl -0x24(%rbp), %eax
movl %eax, -0x4(%rbp)
jmp 0x671eb
movq -0x10(%rbp), %rax
movl -0x14(%rbp), %ecx
decl %ecx
movslq %ecx, %rcx
movzbl (%rax,%rcx), %eax
movl %eax, -0x6c(%rbp)
subl $0x6e, %eax
je 0x67104
jmp 0x670e0
movl -0x6c(%rbp), %eax
subl $0x73, %eax
je 0x6714b
jmp 0x670ea
movl -0x6c(%rbp), %eax
subl $0x75, %eax
je 0x67199
jmp 0x670f8
movl $0x1, -0x4(%rbp)
jmp 0x671eb
movq -0x10(%rbp), %rdi
movl -0x14(%rbp), %esi
subl $0x2, %esi
xorl %edx, %edx
leaq -0x30(%rbp), %rcx
callq 0x662c0
movl %eax, -0x24(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0x78(%rbp)
movsd -0x30(%rbp), %xmm0
callq 0x7b820
movq %rax, %rcx
movq -0x78(%rbp), %rax
movq %rcx, -0x50(%rbp)
movq -0x50(%rbp), %rcx
movq %rcx, (%rax)
movl -0x24(%rbp), %eax
movl %eax, -0x4(%rbp)
jmp 0x671eb
movq -0x10(%rbp), %rdi
movl -0x14(%rbp), %esi
subl $0x2, %esi
leaq -0x38(%rbp), %rdx
callq 0x66c00
cmpl $0x0, %eax
setne %al
xorb $-0x1, %al
andb $0x1, %al
movzbl %al, %eax
movl %eax, -0x24(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0x80(%rbp)
movq -0x38(%rbp), %rdi
callq 0x3b880
movq %rax, %rcx
movq -0x80(%rbp), %rax
movq %rcx, -0x58(%rbp)
movq -0x58(%rbp), %rcx
movq %rcx, (%rax)
movl -0x24(%rbp), %eax
movl %eax, -0x4(%rbp)
jmp 0x671eb
movq -0x10(%rbp), %rdi
movl -0x14(%rbp), %esi
subl $0x2, %esi
leaq -0x40(%rbp), %rdx
callq 0x66fe0
cmpl $0x0, %eax
setne %al
xorb $-0x1, %al
andb $0x1, %al
movzbl %al, %eax
movl %eax, -0x24(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0x88(%rbp)
movq -0x40(%rbp), %rdi
callq 0x3b8d0
movq %rax, %rcx
movq -0x88(%rbp), %rax
movq %rcx, -0x60(%rbp)
movq -0x60(%rbp), %rcx
movq %rcx, (%rax)
movl -0x24(%rbp), %eax
movl %eax, -0x4(%rbp)
movl -0x4(%rbp), %eax
addq $0x90, %rsp
popq %rbp
retq
nopw (%rax,%rax)