eval_include.c

Go to the documentation of this file.

#include "evaluator.h"
#include "mir.h"
#include "module.h"
#include "mya.h"
#include "types/keywords.h"
 
void
eval_include(mir_t* mir, module_t* module, ast_node_t* ast)
{
  if (ast->type != NT_STATEMENT || ast->token->value != KEY_INCLUDE) {
    module_add_error(
      module,
      ast->token->line,
      ast->token->column,
      ast->token->lexeme.length,
      "Unexpected token where is expected an include statement."
    );
 
    return;
  }
 
  token_t* token_path = ast->children[0].token;
  module_t* submodule = module_add_submodule(module);
  if (module_init(submodule, token_path->lexeme.data) != ERR_OK) {
    module_add_error(
      module,
      token_path->line,
      token_path->column,
      token_path->lexeme.length,
      "File not found. You should use an absolute path or a relative path from the current working directory."
    );
 
    return;
  }
 
  if (mya_lexer(submodule) != ERR_OK) {
    return;
  }
 
  if (mya_parser(submodule) != ERR_OK) {
    return;
  }
 
  mya_evaluator(mir, submodule);
}