xo-alloc2 xo-object: bugfix + refactor -> IGCObject_DList builds

include/xo/object2/DInteger.hpp

@@ -5,9 +5,11 @@
 
 #pragma once
 
+#include <cstdint>
+
 namespace xo {
     namespace scm {
-        using DInteger = double;
+        using DInteger = std::int64_t;
     } /*nmaespace obj*/
 } /*namespace xo*/
 

include/xo/object2/DList.hpp

@@ -0,0 +1,26 @@
+/** @file DList.hpp
+ *
+ *  @author Roland Conybeare, Dec 2025
+ **/
+
+#include "xo/alloc2/RGCObject.hpp"
+#include "xo/alloc2/IGCObject_Any.hpp"
+#include "xo/facet/obj.hpp"
+
+namespace xo {
+    namespace scm {
+
+        struct DList {
+            using AGCObject = xo::mm::AGCObject;
+
+            DList(xo::obj<AGCObject> h,
+                  xo::obj<AGCObject> r) : head_{h}, rest_{r} {}
+
+            obj<AGCObject> head_;
+            obj<AGCObject> rest_;
+        };
+
+    } /*namespace scm*/
+} /*namespace xo*/
+
+/* end DList.hpp */

include/xo/object2/IGCObject_DList.hpp

@@ -0,0 +1,36 @@
+/** @file IGCObject_DList.hpp
+ *
+ *  @author Roland Conybeare, Dec 2025
+ **/
+
+#pragma once
+
+#include <xo/alloc2/AAllocator.hpp>
+#include <xo/alloc2/RAllocator.hpp>
+#include <xo/alloc2/ACollector.hpp>
+#include <xo/alloc2/ICollector_Any.hpp>
+#include <xo/alloc2/RCollector.hpp>
+#include <xo/alloc2/AGCObject.hpp>
+#include <xo/alloc2/IGCObject_Xfer.hpp>
+#include "DList.hpp"
+
+namespace xo {
+    namespace scm {
+        /* changes here coordinate with:
+         *  IGCObject_XFer
+         */
+        struct IGCObject_DList {
+        public:
+            using AAllocator = xo::mm::AAllocator;
+            using ACollector = xo::mm::ACollector;
+            using size_type = std::size_t;
+
+            static size_type shallow_size(const DList & d) noexcept;
+            static DList * shallow_copy(const DList & d, obj<AAllocator> mm) noexcept;
+            static size_type forward_children(DList & d, obj<ACollector> gc) noexcept;
+        };
+
+    } /*namespace scm*/
+} /*namespace xo*/
+
+/* end IGCObject_DList.hpp */

src/object2/CMakeLists.txt

@@ -4,6 +4,7 @@ set(SELF_LIB xo_object2)
 set(SELF_SRCS
     IGCObject_DFloat.cpp
     IGCObject_DInteger.cpp
+    IGCObject_DList.cpp
     )
 
 xo_add_shared_library4(${SELF_LIB} ${PROJECT_NAME}Targets ${PROJECT_VERSION} 1 ${SELF_SRCS})

src/object2/IGCObject_DList.cpp

@@ -0,0 +1,45 @@
+/** @file IGCObject_DList.cpp
+ *
+ *  @author Roland Conybeare, Dec 2025
+ **/
+
+#include "IGCObject_DList.hpp"
+
+namespace xo {
+    using xo::mm::AAllocator;
+    using xo::facet::obj;
+    using std::size_t;
+
+    namespace scm {
+        size_t
+        IGCObject_DList::shallow_size(const DList &) noexcept
+        {
+            return sizeof(DList);
+        }
+
+        DList *
+        IGCObject_DList::shallow_copy(const DList & src,
+                                      obj<AAllocator> mm) noexcept
+        {
+            DList * copy = (DList *)mm.alloc(sizeof(DList));
+
+            if (copy)
+                *copy = src;
+
+            return copy;
+        }
+
+        size_t
+        IGCObject_DList::forward_children(DList & src,
+                                          obj<ACollector> gc) noexcept
+        {
+            gc.forward_inplace(&src.head_);
+            gc.forward_inplace(&src.rest_);
+
+            return shallow_size(src);
+        }
+
+    } /*namespace scm*/
+} /*namespace xo*/
+
+/* end IGCObject_DList.cpp */