From a911125605e84c78fc6f42b9ac7f1b5c65f8a677 Mon Sep 17 00:00:00 2001
From: Roland Conybeare <rconybeare@gmail.com>
Date: Wed, 11 Mar 2026 14:13:48 -0500
Subject: [PATCH] xo-reader2: parse list types + utest

---
 include/xo/type/DListType.hpp | 5 ++++-
 src/type/DListType.cpp        | 7 +++++++
 2 files changed, 11 insertions(+), 1 deletion(-)

diff --git a/include/xo/type/DListType.hpp b/include/xo/type/DListType.hpp
index 51db941..e19e48b 100644
--- a/include/xo/type/DListType.hpp
+++ b/include/xo/type/DListType.hpp
@@ -32,9 +32,12 @@ namespace xo {
 
             explicit DListType(obj<AType> elt);
 
-            /** create instance using memory from @p mm with metatype @p mtype **/
+            /** create instance using memory from @p mm with element type @p elt_type **/
             static DListType * _make(obj<AAllocator> mm,
                                      obj<AType> elt_type);
+            /** create fop to new instance using memory from @p mm with element type @p elt_type **/
+            static obj<AType,DListType> make(obj<AAllocator> mm,
+                                             obj<AType> elt_type);
 
             ///@}
             /** @defgroup xo-scm-listtype-type-facet **/
diff --git a/src/type/DListType.cpp b/src/type/DListType.cpp
index 35b2923..47c8ea1 100644
--- a/src/type/DListType.cpp
+++ b/src/type/DListType.cpp
@@ -31,6 +31,13 @@ namespace xo {
             return new (mem) DListType(elt_type);
         }
 
+        obj<AType, DListType>
+        DListType::make(obj<AAllocator> mm,
+                        obj<AType> elt_type)
+        {
+            return obj<AType, DListType>(_make(mm, elt_type));
+        }
+
         // ----- type facet -----
 
         TypeDescr