elna/gcc/elna-diagnostic.cc

#include "elna/gcc/elna-diagnostic.h"
#include "elna/gcc/elna-tree.h"

namespace elna
{
namespace gcc
{
    location_t get_location(const elna::source::position *position)
    {
        linemap_line_start(line_table, position->line, 0);

        return linemap_position_for_column(line_table, position->column);
    }

    const char *print_type(tree type)
    {
        gcc_assert(TYPE_P(type));

        if (type == integer_type_node)
        {
            return "Int";
        }
        else if (type == boolean_type_node)
        {
            return "Bool";
        }
        else if (type == double_type_node)
        {
            return "Float";
        }
        else
        {
            return "<<unknown-type>>";
        }
    }
}
}