// File: /workspace/github_c_makefile_star2_O0/naleksiev[P]fin/src/fin_ast.c
// Function: fin_ast_parse
fin_ast_module_t* fin_ast_parse(fin_ctx_t* ctx, const char* str) {
    fin_lex_t* lex = fin_lex_create(ctx->alloc, str);
    fin_str_t* name = fin_str_create(ctx, "<noname>", -1);

/*
    if (fin_lex_match(&lex, fin_lex_type_module)) {
    }
    while (fin_lex_match(lex, fin_lex_type_import)) {
    }
*/

    fin_ast_func_t*  funcs = NULL;
    fin_ast_func_t** func_tail = &funcs;

    fin_ast_enum_t*  enums = NULL;
    fin_ast_enum_t** enum_tail = &enums;

    fin_ast_type_t*  types = NULL;
    fin_ast_type_t** type_tail = &types;

    while (fin_lex_get_type(lex) != fin_lex_type_eof) {
        if (fin_lex_get_type(lex) == fin_lex_type_struct) {
            *type_tail = fin_ast_parse_type(ctx, lex);
            type_tail = &(*type_tail)->next;
        }
        else  if (fin_lex_get_type(lex) == fin_lex_type_enum) {
            *enum_tail = fin_ast_parse_enum(ctx, lex);
            enum_tail = &(*enum_tail)->next;
        }
        else {
            *func_tail = fin_ast_parse_func(ctx, lex);
            func_tail = &(*func_tail)->next;
        }
    }

    fin_lex_destroy(ctx->alloc, lex);

    fin_ast_module_t* module = (fin_ast_module_t*)ctx->alloc(NULL, sizeof(fin_ast_module_t));
    module->ctx = ctx;
    module->name = name;
    module->types = types;
    module->enums = enums;
    module->funcs = funcs;
    return module;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x60, %rsp
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq -0x8(%rbp), %rax
movq (%rax), %rdi
movq -0x10(%rbp), %rsi
callq 0x6420
movq %rax, -0x18(%rbp)
movq -0x8(%rbp), %rdi
leaq 0x9d8d(%rip), %rsi      # 0xd20c
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
callq 0xae20
movq %rax, -0x20(%rbp)
movq $0x0, -0x28(%rbp)
leaq -0x28(%rbp), %rax
movq %rax, -0x30(%rbp)
movq $0x0, -0x38(%rbp)
leaq -0x38(%rbp), %rax
movq %rax, -0x40(%rbp)
movq $0x0, -0x48(%rbp)
leaq -0x48(%rbp), %rax
movq %rax, -0x50(%rbp)
movq -0x18(%rbp), %rdi
callq 0x6d10
cmpl $0x41, %eax
je 0x3568
movq -0x18(%rbp), %rdi
callq 0x6d10
cmpl $0x3e, %eax
jne 0x3505
movq -0x8(%rbp), %rdi
movq -0x18(%rbp), %rsi
callq 0x35d0
movq %rax, %rcx
movq -0x50(%rbp), %rax
movq %rcx, (%rax)
movq -0x50(%rbp), %rax
movq (%rax), %rax
addq $0x18, %rax
movq %rax, -0x50(%rbp)
jmp 0x3563
movq -0x18(%rbp), %rdi
callq 0x6d10
cmpl $0x3f, %eax
jne 0x353b
movq -0x8(%rbp), %rdi
movq -0x18(%rbp), %rsi
callq 0x36d0
movq %rax, %rcx
movq -0x40(%rbp), %rax
movq %rcx, (%rax)
movq -0x40(%rbp), %rax
movq (%rax), %rax
addq $0x10, %rax
movq %rax, -0x40(%rbp)
jmp 0x3561
movq -0x8(%rbp), %rdi
movq -0x18(%rbp), %rsi
callq 0x37d0
movq %rax, %rcx
movq -0x30(%rbp), %rax
movq %rcx, (%rax)
movq -0x30(%rbp), %rax
movq (%rax), %rax
addq $0x28, %rax
movq %rax, -0x30(%rbp)
jmp 0x3563
jmp 0x34bd
movq -0x8(%rbp), %rax
movq (%rax), %rdi
movq -0x18(%rbp), %rsi
callq 0x64e0
movq -0x8(%rbp), %rax
xorl %ecx, %ecx
movl %ecx, %edi
movl $0x28, %esi
callq *(%rax)
movq %rax, -0x58(%rbp)
movq -0x8(%rbp), %rcx
movq -0x58(%rbp), %rax
movq %rcx, (%rax)
movq -0x20(%rbp), %rcx
movq -0x58(%rbp), %rax
movq %rcx, 0x8(%rax)
movq -0x48(%rbp), %rcx
movq -0x58(%rbp), %rax
movq %rcx, 0x10(%rax)
movq -0x38(%rbp), %rcx
movq -0x58(%rbp), %rax
movq %rcx, 0x18(%rax)
movq -0x28(%rbp), %rcx
movq -0x58(%rbp), %rax
movq %rcx, 0x20(%rax)
movq -0x58(%rbp), %rax
addq $0x60, %rsp
popq %rbp
retq