// File: sighingnow[P]compile-pascal/pl0_parser.cpp
// Function: pl0_const_define_fn(input_t*)
pair<int, pl0_ast_const_define *> pl0_const_define_fn(input_t *text) {
    auto parser = pl0_identify + (pl0_character('=') >> pl0_const);
    auto res = (spaces >> parser << spaces)(text);
    if (verbose) {
        cout << "parsing: Constant Define" << endl;
    }
    return make_pair(std::get<0>(res), new pl0_ast_const_define(text->locate(), std::get<1>(res).first, std::get<1>(res).second));
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x560, %rsp            # imm = 0x560
movq %rdi, -0x18(%rbp)
movb $0x3d, -0x1c9(%rbp)
leaq -0x1c8(%rbp), %rdi
movq %rdi, -0x518(%rbp)
leaq -0x1c9(%rbp), %rsi
callq 0xa240
movq -0x518(%rbp), %rsi
leaq 0x151062(%rip), %rdx    # 0x15fb90
leaq -0x180(%rbp), %rdi
callq 0x1e080
jmp 0xeb3c
leaq 0x15116d(%rip), %rsi    # 0x15fcb0
leaq -0xf0(%rbp), %rdi
leaq -0x180(%rbp), %rdx
callq 0x1fa30
jmp 0xeb58
leaq -0x180(%rbp), %rdi
callq 0x1e1b0
leaq -0x1c8(%rbp), %rdi
callq 0x19a20
leaq 0x150c59(%rip), %rsi    # 0x15f7d0
leaq -0x500(%rbp), %rdi
leaq -0xf0(%rbp), %rdx
callq 0x1fab0
jmp 0xeb8c
leaq 0x150c3d(%rip), %rdx    # 0x15f7d0
leaq -0x3c0(%rbp), %rdi
leaq -0x500(%rbp), %rsi
callq 0x1fa70
jmp 0xeba8
movq -0x18(%rbp), %rdx
leaq -0x218(%rbp), %rdi
leaq -0x3c0(%rbp), %rsi
callq 0x1faf0
jmp 0xebc1
leaq -0x3c0(%rbp), %rdi
callq 0x1fe60
leaq -0x500(%rbp), %rdi
callq 0x1fe90
testb $0x1, 0x150c58(%rip)    # 0x15f838
je 0xecd0
movq 0x1503eb(%rip), %rdi    # 0x15efd8
leaq 0xe06f3(%rip), %rsi     # 0xef2e7
callq 0x5330
movq %rax, -0x520(%rbp)
jmp 0xec02
movq -0x520(%rbp), %rdi
movq 0x1503b0(%rip), %rsi    # 0x15efc0
callq 0x53a0
jmp 0xec17
jmp 0xecd0
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
jmp 0xec4e
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
leaq -0x180(%rbp), %rdi
callq 0x1e1b0
leaq -0x1c8(%rbp), %rdi
callq 0x19a20
jmp 0xee06
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
jmp 0xedfa
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
jmp 0xeca8
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
leaq -0x3c0(%rbp), %rdi
callq 0x1fe60
leaq -0x500(%rbp), %rdi
callq 0x1fe90
jmp 0xedfa
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
jmp 0xedee
leaq -0x218(%rbp), %rdi
callq 0x1fef0
movq %rax, -0x530(%rbp)
movl $0x18, %edi
callq 0x5340
movq %rax, -0x528(%rbp)
jmp 0xecf6
movq -0x18(%rbp), %rdi
callq 0x1a350
movq %rax, -0x538(%rbp)
jmp 0xed08
movq -0x538(%rbp), %rax
movq %rax, -0x510(%rbp)
leaq -0x218(%rbp), %rdi
movq %rdi, -0x548(%rbp)
callq 0x1ff10
movq -0x548(%rbp), %rdi
movq (%rax), %rax
movq %rax, -0x540(%rbp)
callq 0x1ff10
movq -0x528(%rbp), %rdi
movq -0x540(%rbp), %rdx
movq 0x8(%rax), %rcx
movq -0x510(%rbp), %rsi
callq 0x1ff30
jmp 0xed5f
movq -0x530(%rbp), %rdi
movq -0x528(%rbp), %rax
movq %rax, -0x508(%rbp)
leaq -0x508(%rbp), %rsi
callq 0x1fec0
movq %rdx, -0x558(%rbp)
movl %eax, -0x54c(%rbp)
jmp 0xed8f
movq -0x558(%rbp), %rax
movl -0x54c(%rbp), %ecx
movl %ecx, -0x10(%rbp)
movq %rax, -0x8(%rbp)
leaq -0x218(%rbp), %rdi
callq 0x1ff70
leaq -0xf0(%rbp), %rdi
callq 0x1ff90
movl -0x10(%rbp), %eax
movq -0x8(%rbp), %rdx
addq $0x560, %rsp            # imm = 0x560
popq %rbp
retq
movq -0x528(%rbp), %rdi
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x1d8(%rbp)
movl %eax, -0x1dc(%rbp)
movl $0x18, %esi
callq 0x5350
leaq -0x218(%rbp), %rdi
callq 0x1ff70
leaq -0xf0(%rbp), %rdi
callq 0x1ff90
movq -0x1d8(%rbp), %rdi
callq 0x55b0
nopw %cs:(%rax,%rax)