Value.cpp

#include "Value.h"

namespace Noble::Core::Runtime
{
    ValueType ToValue(const FloatType data)
    {
        ValueType value;
        memcpy(&value, &data, sizeof(FloatType));
        return value;
    }

    ValueType ToValue(const bool data)
    {
        return data ? TrueValue : FalseValue;
    }

    ValueType ToValue(const char c)
    {
        return QNaN | CharBit | static_cast<ValueType>(c);
    }

    ValueType ToValue(Object* object)
    {
        return SignBit | QNaN | static_cast<ValueType>(reinterpret_cast<uintptr_t>(object));
    }

    FloatType ToFloat(const ValueType value)
    {
        FloatType data;
        memcpy(&data, &value, sizeof(ValueType));
        return data;
    }

    bool ToBool(const ValueType value)
    {
        return value == TrueValue;
    }

    char ToChar(const ValueType value)
    {
        return static_cast<char>(value);
    }

    Object* ToObject(const ValueType value)
    {
        return reinterpret_cast<Object*>(static_cast<uintptr_t>(value & ~(SignBit | QNaN)));
    }

    bool IsNull(const ValueType value)
    {
        return value == NullValue;
    }

    bool IsFloat(const ValueType value)
    {
        return (value & QNaN) != QNaN;
    }

    bool IsBool(const ValueType value)
    {
        return value == TrueValue || value == FalseValue;
    }

    bool IsChar(const ValueType value)
    {
        return (value & (QNaN | CharBit)) == (QNaN | CharBit);
    }

    bool IsObject(const ValueType value)
    {
        return (value & (QNaN | SignBit)) == (QNaN | SignBit);
    }

    bool IsObjectType(const ValueType value, const Object::Type type)
    {
        return IsObject(value) and ToObject(value)->type == type;
    }

    bool IsFalsey(const ValueType value)
    {
        return IsNull(value) or (IsBool(value) and !ToBool(value));
    }

    bool IsTruthy(const ValueType value)
    {
        return IsBool(value) and ToBool(value);
    }
}