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

xo-reader: distinguish interactive sessions

Browse source 
+ allow top-level i64 literals
This commit is contained in:
Roland Conybeare 2025-07-04 10:10:40 -05:00
commit a12a236bc1
16 changed files with 196 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

48
xo-reader/src/reader/exprseq_xs.cpp
View file

@ -3,25 +3,28 @@
#include "exprseq_xs.hpp"
#include "parserstatemachine.hpp"
#include "exprstatestack.hpp"
#include "exprseq_xs.hpp"
#include "expect_expr_xs.hpp"
#include "define_xs.hpp"
#include "expect_symbol_xs.hpp"
namespace xo {
namespace scm {
std::unique_ptr<exprseq_xs>
exprseq_xs::make()
exprseq_xs::make(exprseqtype seqtype)
{
return std::make_unique<exprseq_xs>(exprseq_xs());
return std::make_unique<exprseq_xs>(exprseq_xs(seqtype));
}
void
exprseq_xs::start(parserstatemachine * p_psm)
exprseq_xs::start(exprseqtype seqtype, parserstatemachine * p_psm)
{
p_psm->push_exprstate(exprseq_xs::make());
p_psm->push_exprstate(exprseq_xs::make(seqtype));
}
exprseq_xs::exprseq_xs()
: exprstate(exprstatetype::expect_toplevel_expression_sequence)
exprseq_xs::exprseq_xs(exprseqtype x)
: exprstate(exprstatetype::expect_toplevel_expression_sequence),
xseqtype_{x}
{
}
@ -51,6 +54,24 @@ namespace xo {
this->illegal_input_error(c_self_name, tk);
}
void
exprseq_xs::on_i64_token(const token_type & tk,
parserstatemachine * p_psm)
{
constexpr bool c_debug_flag = true;
scope log(XO_DEBUG(c_debug_flag));
constexpr const char * c_self_name = "exprseq_xs::on_i64_token";
if (xseqtype_ == exprseqtype::toplevel_interactive)
{
expect_expr_xs::start(p_psm);
p_psm->top_exprstate().on_i64_token(tk, p_psm);
} else {
this->illegal_input_error(c_self_name, tk);
}
}
void
exprseq_xs::on_typedescr(TypeDescr /*td*/,
parserstatemachine * /*p_psm*/)
@ -73,6 +94,21 @@ namespace xo {
*p_emit_expr = expr.promote();
} /*on_expr*/
void
exprseq_xs::on_expr_with_semicolon(ref::brw<Expression> expr,
parserstatemachine * p_psm)
{
/* toplevel expression sequence accepts an
* arbitrary number of expressions.
*
* semicolons are sometimes mandatory to avoid ambiguity.
*/
auto p_emit_expr = p_psm->p_emit_expr_;
*p_emit_expr = expr.promote();
}
} /*namespace scm*/
} /*namespace xo*/