roland/xo-expression
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

xo-interpreter2: apply sequence now working in interpreter

Browse source
This commit is contained in:
Roland Conybeare 2026-02-04 16:26:19 -05:00
commit a63e4b1dae
7 changed files with 201 additions and 33 deletions
Download patch file Download diff file Expand all files Collapse all files

16
src/interpreter2/DVsmEvalArgsFrame.cpp
View file

@ -14,22 +14,26 @@ namespace xo {
// ----- VsmEvalArgsFrame -----
DVsmEvalArgsFrame::DVsmEvalArgsFrame(obj<AGCObject> old_parent,
VsmInstr old_cont)
: VsmFrame(old_parent, old_cont)
DVsmEvalArgsFrame::DVsmEvalArgsFrame(DVsmApplyFrame * parent,
VsmInstr cont,
const DApplyExpr * apply_expr)
: parent_{parent},
cont_{cont},
apply_expr_{apply_expr}
{}
DVsmEvalArgsFrame *
DVsmEvalArgsFrame::make(obj<AAllocator> mm,
obj<AGCObject> apply_frame,
VsmInstr cont)
DVsmApplyFrame * apply_frame,
VsmInstr cont,
const DApplyExpr * apply_expr)
{
DVsmEvalArgsFrame * result = nullptr;
void * mem = mm.alloc(typeseq::id<DVsmEvalArgsFrame>(),
sizeof(DVsmEvalArgsFrame));
result = new (mem) DVsmEvalArgsFrame(apply_frame, cont);
result = new (mem) DVsmEvalArgsFrame(apply_frame, cont, apply_expr);
assert(result);