xo-interpreter2 stack: parse literal lists (w/ implicit types)
This commit is contained in:
parent
6198293816
commit
5f3000693e
4 changed files with 25 additions and 2 deletions
|
|
@ -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;
|
||||
|
||||
|
|
|
|||
13
include/xo/object2/List.hpp
Normal file
13
include/xo/object2/List.hpp
Normal 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 */
|
||||
|
|
@ -5,8 +5,7 @@
|
|||
|
||||
#pragma once
|
||||
|
||||
#include "list/IGCObject_DList.hpp"
|
||||
#include "DList.hpp"
|
||||
#include "List.hpp"
|
||||
|
||||
namespace xo {
|
||||
namespace scm {
|
||||
|
|
|
|||
|
|
@ -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
|
||||
{
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue