// File: /workspace/github_cpp_makefile_star2_O2/sighingnow[P]compile-pascal/pl0_parser.cpp
// Function: pl0_const_fn(input_t*)
pair<int, pl0_ast_constv *> pl0_const_fn(input_t *text) {
    auto res1 = (spaces >> (pl0_character('+') | pl0_character('-')) << spaces)(text);
    pair<int, pl0_ast_constv *> ans;
    if (std::get<0>(res1) != -1) {
        int flag = std::get<1>(res1) == '+' ? (1) : (-1);
        auto res2 = pl0_unsigned(text->drop(std::get<0>(res1)));
        ans = make_pair(
            std::get<0>(res2) == -1 ? -1 : (std::get<0>(res1) + std::get<0>(res2)),
            new pl0_ast_constv(text->locate(), std::get<1>(res2)->val * flag, pl0_ast_constv::INT)
        );
    }
    else {
        auto res = (pl0_unsigned | pl0_char)(text);
        ans = make_pair(std::get<0>(res), new pl0_ast_constv(text->locate(), std::get<1>(res) ? std::get<1>(res)->val : 0, std::get<1>(res) ? std::get<1>(res)->dt : pl0_ast_constv::INT));
    }
    if (verbose) {
        cout << "parsing: Constant" << endl;
    }
    return ans;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
subq $0x3b0, %rsp            # imm = 0x3B0
movq %rdi, %rbx
leaq 0xf(%rsp), %rsi
movb $0x2b, (%rsi)
leaq 0x80(%rsp), %rdi
callq 0x818c
leaq 0xe(%rsp), %rsi
movb $0x2d, (%rsi)
leaq 0x38(%rsp), %rdi
callq 0x818c
leaq 0x320(%rsp), %rdi
leaq 0x80(%rsp), %rsi
leaq 0x38(%rsp), %rdx
callq 0x179ec
leaq 0x8275c(%rip), %rsi     # 0x8b6d8
leaq 0x228(%rsp), %rdi
leaq 0x320(%rsp), %rdx
callq 0x179b6
leaq 0x82740(%rip), %rdx     # 0x8b6d8
leaq 0xc8(%rsp), %rdi
leaq 0x228(%rsp), %rsi
callq 0x17908
leaq 0x10(%rsp), %rdi
leaq 0xc8(%rsp), %rsi
movq %rbx, %rdx
callq 0x108ee
leaq 0xc8(%rsp), %rdi
callq 0x10a82
leaq 0x228(%rsp), %rdi
callq 0x10a9c
leaq 0x320(%rsp), %rdi
callq 0x10ab2
leaq 0x38(%rsp), %rdi
callq 0xfaa6
leaq 0x80(%rsp), %rdi
callq 0xfaa6
cmpl $-0x1, 0x34(%rsp)
je 0x907d
leaq 0x34(%rsp), %rsi
movb -0x4(%rsi), %r15b
movq %rbx, %rdi
callq 0x10b60
leaq 0x82b49(%rip), %rsi     # 0x8bb68
leaq 0xc8(%rsp), %rdi
movq %rax, %rdx
callq 0x10ac8
movl 0xf0(%rsp), %r12d
movl 0x34(%rsp), %ebp
pushq $0x10
popq %rdi
callq 0x5260
movq %rax, %r14
addl %r12d, %ebp
cmpl $-0x1, %r12d
cmovel %r12d, %ebp
leaq 0xc8(%rsp), %rdi
movq 0x20(%rdi), %rax
movl 0x8(%rax), %eax
movl %eax, %ecx
negl %ecx
cmpb $0x2b, %r15b
movq 0x8(%rbx), %rdx
cmovel %eax, %ecx
movq %rdx, (%r14)
movl %ecx, 0x8(%r14)
andl $0x0, 0xc(%r14)
jmp 0x90f6
leaq 0x82ae4(%rip), %rsi     # 0x8bb68
leaq 0x82a4d(%rip), %rdx     # 0x8bad8
leaq 0xc8(%rsp), %rdi
callq 0x17a22
leaq 0x228(%rsp), %rdi
leaq 0xc8(%rsp), %rsi
movq %rbx, %rdx
callq 0x10cb0
leaq 0xc8(%rsp), %rdi
callq 0x10dce
pushq $0x10
popq %rdi
callq 0x5260
movq %rax, %r14
movq 0x8(%rbx), %rax
movq 0x248(%rsp), %rcx
testq %rcx, %rcx
je 0x90e0
movsd 0x8(%rcx), %xmm0
jmp 0x90e3
xorps %xmm0, %xmm0
movq %rax, (%r14)
movlps %xmm0, 0x8(%r14)
leaq 0x228(%rsp), %rdi
movl 0x28(%rdi), %ebp
callq 0x5120
leaq 0x10(%rsp), %rdi
callq 0x5120
movl %ebp, %eax
movq %r14, %rdx
addq $0x3b0, %rsp            # imm = 0x3B0
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
retq
movq %rax, %rbx
leaq 0x228(%rsp), %rdi
jmp 0x9146
movq %rax, %rbx
leaq 0xc8(%rsp), %rdi
callq 0x10dce
jmp 0x91a7
jmp 0x91a4
movq %rax, %rbx
leaq 0xc8(%rsp), %rdi
callq 0x5120
jmp 0x91a7
movq %rax, %rbx
leaq 0xc8(%rsp), %rdi
callq 0x10a82
jmp 0x9162
movq %rax, %rbx
leaq 0x228(%rsp), %rdi
callq 0x10a9c
jmp 0x9174
movq %rax, %rbx
leaq 0x320(%rsp), %rdi
callq 0x10ab2
jmp 0x9186
movq %rax, %rbx
leaq 0x38(%rsp), %rdi
callq 0xfaa6
jmp 0x9195
movq %rax, %rbx
leaq 0x80(%rsp), %rdi
callq 0xfaa6
jmp 0x91b1
movq %rax, %rbx
leaq 0x10(%rsp), %rdi
callq 0x5120
movq %rbx, %rdi
callq 0x53f0