// File: /workspace/github_c_makefile_star2_O0/janet-lang[P]janet/src/core/parse.c
// Function: delim_error
static void delim_error(JanetParser *parser, size_t stack_index, char c, const char *msg) {
    JanetParseState *s = parser->states + stack_index;
    JanetBuffer *buffer = janet_buffer(40);
    if (msg) {
        janet_buffer_push_cstring(buffer, msg);
    }
    if (c) {
        janet_buffer_push_u8(buffer, c);
    }
    if (stack_index > 0) {
        janet_buffer_push_cstring(buffer, ", ");
        if (s->flags & PFLAG_PARENS) {
            janet_buffer_push_u8(buffer, '(');
        } else if (s->flags & PFLAG_SQRBRACKETS) {
            janet_buffer_push_u8(buffer, '[');
        } else if (s->flags & PFLAG_CURLYBRACKETS) {
            janet_buffer_push_u8(buffer, '{');
        } else if (s->flags & PFLAG_STRING) {
            janet_buffer_push_u8(buffer, '"');
        } else if (s->flags & PFLAG_LONGSTRING) {
            int32_t i;
            for (i = 0; i < s->argn; i++) {
                janet_buffer_push_u8(buffer, '`');
            }
        }
        janet_formatb(buffer, " opened at line %d, column %d", (int32_t) s->line, (int32_t) s->column);
    }
    parser->error = (const char *) janet_string(buffer->data, buffer->count);
    parser->flag |= JANET_PARSER_GENERATED_ERROR;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movb %dl, %al
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movb %al, -0x11(%rbp)
movq %rcx, -0x20(%rbp)
movq -0x8(%rbp), %rax
movq 0x10(%rax), %rax
imulq $0x28, -0x10(%rbp), %rcx
addq %rcx, %rax
movq %rax, -0x28(%rbp)
movl $0x28, %edi
callq 0x18490
movq %rax, -0x30(%rbp)
cmpq $0x0, -0x20(%rbp)
je 0x4fbaf
movq -0x30(%rbp), %rdi
movq -0x20(%rbp), %rsi
callq 0x18750
cmpb $0x0, -0x11(%rbp)
je 0x4fbc2
movq -0x30(%rbp), %rdi
movzbl -0x11(%rbp), %esi
callq 0x18820
cmpq $0x0, -0x10(%rbp)
jbe 0x4fcd4
movq -0x30(%rbp), %rdi
leaq 0x44d32(%rip), %rsi     # 0x9490a
callq 0x18750
movq -0x28(%rbp), %rax
movl 0x8(%rax), %eax
andl $0x400, %eax            # imm = 0x400
cmpl $0x0, %eax
je 0x4fc01
movq -0x30(%rbp), %rdi
movl $0x28, %esi
callq 0x18820
jmp 0x4fcae
movq -0x28(%rbp), %rax
movl 0x8(%rax), %eax
andl $0x800, %eax            # imm = 0x800
cmpl $0x0, %eax
je 0x4fc25
movq -0x30(%rbp), %rdi
movl $0x5b, %esi
callq 0x18820
jmp 0x4fcac
movq -0x28(%rbp), %rax
movl 0x8(%rax), %eax
andl $0x1000, %eax           # imm = 0x1000
cmpl $0x0, %eax
je 0x4fc46
movq -0x30(%rbp), %rdi
movl $0x7b, %esi
callq 0x18820
jmp 0x4fcaa
movq -0x28(%rbp), %rax
movl 0x8(%rax), %eax
andl $0x2000, %eax           # imm = 0x2000
cmpl $0x0, %eax
je 0x4fc67
movq -0x30(%rbp), %rdi
movl $0x22, %esi
callq 0x18820
jmp 0x4fca8
movq -0x28(%rbp), %rax
movl 0x8(%rax), %eax
andl $0x4000, %eax           # imm = 0x4000
cmpl $0x0, %eax
je 0x4fca6
movl $0x0, -0x34(%rbp)
movl -0x34(%rbp), %eax
movq -0x28(%rbp), %rcx
cmpl 0x4(%rcx), %eax
jge 0x4fca4
movq -0x30(%rbp), %rdi
movl $0x60, %esi
callq 0x18820
movl -0x34(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x34(%rbp)
jmp 0x4fc7f
jmp 0x4fca6
jmp 0x4fca8
jmp 0x4fcaa
jmp 0x4fcac
jmp 0x4fcae
movq -0x30(%rbp), %rdi
movq -0x28(%rbp), %rax
movq 0x10(%rax), %rax
movl %eax, %edx
movq -0x28(%rbp), %rax
movq 0x18(%rax), %rax
movl %eax, %ecx
leaq 0x44c40(%rip), %rsi     # 0x9490d
movb $0x0, %al
callq 0x5bed0
movq -0x30(%rbp), %rax
movq 0x18(%rax), %rdi
movq -0x30(%rbp), %rax
movl 0x10(%rax), %esi
callq 0x64880
movq %rax, %rcx
movq -0x8(%rbp), %rax
movq %rcx, 0x8(%rax)
movq -0x8(%rbp), %rax
movl 0x6c(%rax), %ecx
orl $0x2, %ecx
movl %ecx, 0x6c(%rax)
addq $0x40, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)