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

This commit is contained in:
Roland Conybeare 2026-03-02 23:21:10 +11:00
commit 5f3000693e
4 changed files with 25 additions and 2 deletions

View file

@ -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;

View file

@ -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 */

View file

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

View file

@ -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
{