xo-object2 xo-gc xo-facet: codegen updates + IGCObject_DString

xo-object2/src/object2/CMakeLists.txt

@@ -5,6 +5,7 @@ set(SELF_SRCS
     IGCObject_DFloat.cpp
     IGCObject_DInteger.cpp
     IGCObject_DList.cpp
+    IGCObject_DString.cpp
     ISequence_Any.cpp
     ISequence_DList.cpp
     IPrintable_DList.cpp

xo-object2/src/object2/DString.cpp

@@ -52,6 +52,22 @@ namespace xo {
             return result;
         }
 
+        DString *
+        DString::clone(obj<AAllocator> mm, const DString * src)
+        {
+            size_type cap = src->capacity_;
+
+            void * mem = mm.alloc(typeseq::id<DString>(),
+                                  sizeof(DString) + cap);
+
+            DString * result = new (mem) DString();
+            result->capacity_ = cap;
+            result->size_ = src->size_;
+            std::memcpy(result->chars_, src->chars_, cap);
+
+            return result;
+        }
+
         DString &
         DString::assign(const DString & other)
         {
@@ -71,6 +87,32 @@ namespace xo {
             return this->size_;
         }
 
+        auto
+        DString::shallow_size() const noexcept -> size_type
+        {
+            return sizeof(DString) + capacity_;
+        }
+
+        DString *
+        DString::shallow_copy(obj<AAllocator> mm) const noexcept
+        {
+            DString * copy = (DString *)mm.alloc_copy((std::byte *)this);
+
+            if (copy) {
+                copy->capacity_ = capacity_;
+                copy->size_ = size_;
+                ::memcpy(copy->chars_, chars_, capacity_);
+            }
+
+            return copy;
+        }
+
+        auto
+        DString::forward_children(obj<ACollector>) noexcept -> size_type
+        {
+            return shallow_size();
+        }
+
     } /*namespace scm*/
 } /*namespace xo*/
 

xo-object2/src/object2/IGCObject_DString.cpp

@@ -0,0 +1,39 @@
+/** @file IGCObject_DString.cpp
+ *
+ *  Generated automagically from ingredients:
+ *  1. code generator:
+ *       [/home/roland/proj/xo-umbrella2-claude1/xo-facet/codegen/genfacet]
+ *     arguments:
+ *       --input [idl/IGCObject_DString.json5]
+ *  2. jinja2 template for abstract facet .hpp file:
+ *       [iface_facet_any.hpp.j2]
+ *  3. idl for facet methods
+ *       [idl/IGCObject_DString.json5]
+**/
+
+#include "IGCObject_DString.hpp"
+
+namespace xo {
+    namespace scm {
+        auto
+        IGCObject_DString::shallow_size(const DString & self) noexcept -> size_type
+        {
+            return self.shallow_size();
+        }
+
+        auto
+        IGCObject_DString::shallow_copy(const DString & self, obj<AAllocator> mm) noexcept -> Opaque
+        {
+            return self.shallow_copy(mm);
+        }
+
+        auto
+        IGCObject_DString::forward_children(DString & self, obj<ACollector> gc) noexcept -> size_type
+        {
+            return self.forward_children(gc);
+        }
+
+    } /*namespace scm*/
+} /*namespace xo*/
+
+/* end IGCObject_DString.cpp */

xo-object2/src/object2/object2_register_facets.cpp

@@ -4,9 +4,11 @@
  **/
 
 #include "object2_register_facets.hpp"
+
 #include <xo/object2/IGCObject_DList.hpp>
 #include <xo/object2/IGCObject_DFloat.hpp>
 #include <xo/object2/IGCObject_DInteger.hpp>
+#include <xo/object2/IGCObject_DString.hpp>
 
 #include <xo/object2/IPrintable_DList.hpp>
 #include <xo/object2/IPrintable_DFloat.hpp>
@@ -23,6 +25,7 @@ namespace xo {
     using xo::mm::AGCObject;
     using xo::scm::DList;
     using xo::scm::DFloat;
+    using xo::scm::DString;
     using xo::facet::FacetRegistry;
     using xo::facet::typeseq;
 
@@ -41,9 +44,12 @@ namespace xo {
             FacetRegistry::register_impl<AGCObject, DInteger>();
             FacetRegistry::register_impl<APrintable, DInteger>();
 
+            FacetRegistry::register_impl<AGCObject, DString>();
+
             log && log(xtag("DList.tseq", typeseq::id<DList>()));
             log && log(xtag("DFloat.tseq", typeseq::id<DFloat>()));
             log && log(xtag("DInteger.tseq", typeseq::id<DInteger>()));
+            log && log(xtag("DString.tseq", typeseq::id<DString>()));
 
             log && log(xtag("AAllocator.tseq", typeseq::id<AAllocator>()));
             log && log(xtag("APrintable.tseq", typeseq::id<APrintable>()));