xo-numeric/xo-object2/include/xo/object2/DInteger.hpp

57 lines
1.6 KiB
C++

/** @file DInteger.hpp
*
* @author Roland Conybeare, Dec 2025
**/
#pragma once
#include <xo/gc/Collector.hpp>
#include <xo/alloc2/Allocator.hpp>
#include <xo/indentlog/print/ppindentinfo.hpp>
#include <xo/facet/obj.hpp>
#include <cstdint>
namespace xo {
namespace scm {
struct DInteger {
using AAllocator = xo::mm::AAllocator;
using ACollector = xo::mm::ACollector;
using ppindentinfo = xo::print::ppindentinfo;
using value_type = long;
explicit DInteger(long x) : value_{x} {}
/** will likely want this to default to ANumeric, once we have it **/
template <typename AFacet>
static obj<AFacet, DInteger> box(obj<AAllocator> mm, long x);
/** allocate boxed value @p x using memory from @p mm **/
static DInteger * _box(obj<AAllocator> mm, long x);
long value() const noexcept { return value_; }
bool pretty(const ppindentinfo & ppii) const;
operator long() const noexcept { return value_; }
// GCObject facet
std::size_t shallow_size() const noexcept;
DInteger * shallow_copy(obj<AAllocator> mm) const noexcept;
std::size_t forward_children(obj<ACollector> gc) noexcept;
private:
/** boxed integer value **/
long value_;
};
template <typename AFacet>
obj<AFacet, DInteger>
DInteger::box(obj<AAllocator> mm, long x) {
return obj<AFacet,DInteger>(_box(mm, x));
}
} /*nmaespace obj*/
} /*namespace xo*/
/* end DInteger.hpp */