#include "ikarus/values/number_value.h"

#include <boost/functional/overloaded_function.hpp>

#include <values/number_value.hpp>
#include <values/value_base.hpp>

IkarusNumberValue::IkarusNumberValue():
    IkarusValue{this} {}

IkarusNumberValue * ikarus_number_value_create() {
    return new IkarusNumberValue{};
}

double const * ikarus_number_value_get(IkarusNumberValue * value, size_t idx) {
    return ikarus_value_base_get(value, idx);
}

size_t ikarus_number_value_get_size(IkarusNumberValue const * value) {
    return ikarus_value_base_get_size(value);
}

void ikarus_number_value_set(IkarusNumberValue * value, size_t idx, double new_data) {
    return ikarus_value_base_set(value, idx, new_data);
}

void ikarus_number_value_remove(IkarusNumberValue * value, size_t idx) {
    return ikarus_value_base_remove(value, idx);
}

void ikarus_number_value_insert(IkarusNumberValue * value, size_t idx, long double new_data) {
    return ikarus_value_base_insert(value, idx, new_data);
}

void ikarus_number_value_clear(IkarusNumberValue * value) {
    return ikarus_value_base_clear(value);
}

bool ikarus_number_value_is_undefined(IkarusNumberValue const * value) {
    return ikarus_value_base_is_undefined(value);
}

void ikarus_number_value_set_undefined(IkarusNumberValue * value, bool undefined) {
    return ikarus_value_base_set_undefined(value, undefined);
}

char const * ikarus_number_value_to_string(IkarusNumberValue const * value) {
    return ikarus_value_base_to_string(value, [](auto const & value) { return value; });
}

bool ikarus_number_value_is_equal(IkarusNumberValue const * lhs, IkarusNumberValue const * rhs) {
    return ikarus_value_base_is_equal(lhs, rhs);
}

IkarusNumberValue * ikarus_number_value_copy(IkarusNumberValue const * value) {
    return ikarus_value_base_copy(value);
}

struct IkarusValue * ikarus_number_value_to_value(IkarusNumberValue * value) {
    return ikarus_value_base_to_value(value);
}

struct IkarusValue const * ikarus_number_value_to_value_const(IkarusNumberValue const * value) {
    return ikarus_value_base_to_value_const(value);
}