xo-interpreter2 stack: parse literal lists (w/ implicit types)

include/xo/object2/DList.hpp

@@ -49,6 +49,9 @@ namespace xo {
             /** return element at 0-based index @p ix **/
             obj<AGCObject> at(size_type ix) const;
 
+            /** assign rest-pointer **/
+            void assign_rest(DList * r);
+
             /** pretty-printing driver; combine layout+printing **/
             bool pretty(const ppindentinfo & ppii) const;
 

include/xo/object2/List.hpp

@@ -0,0 +1,13 @@
+/** @file List.hpp
+ *
+ *  @author Roland Conybeare, Mar 2026
+ **/
+
+#pragma once
+
+#include "DList.hpp"
+#include "list/IGCObject_DList.hpp"
+#include "list/IPrintable_DList.hpp"
+#include "list/ISequence_DList.hpp"
+
+/* end List.hpp */

include/xo/object2/ListOps.hpp

@@ -5,8 +5,7 @@
 
 #pragma once
 
-#include "list/IGCObject_DList.hpp"
+#include "List.hpp"
-#include "DList.hpp"
 
 namespace xo {
     namespace scm {

src/object2/DList.cpp

@@ -105,6 +105,14 @@ namespace xo {
             return l->head_;
         }
 
+        void
+        DList::assign_rest(DList * r)
+        {
+            scope log(XO_DEBUG(true), "need write barrier");
+
+            this->rest_ = r;
+        }
+
         bool
         DList::pretty(const ppindentinfo & ppii) const
         {