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

xo-reader2: ssm pretty-printers include .expect_str() output

Browse source
This commit is contained in:
Roland Conybeare 2026-01-29 10:49:55 -05:00
commit 753b074994
4 changed files with 14 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/reader2/DDefineSsm.cpp
View file

@ -741,6 +741,7 @@ namespace xo {
return ppii.pps()->pretty_struct(ppii,
"DDefineSsm",
refrtag("defstate", defstate_),
refrtag("expect", this->get_expect_str()),
refrtag("def_expr", expr));
}
} /*namespace scm*/

5
src/reader2/DExpectFormalArgSsm.cpp
View file

@ -246,12 +246,15 @@ namespace xo {
(ppii,
"DExpectFormalArgSsm",
refrtag("fstate", fstate_),
refrtag("expect", this->get_expect_str()),
refrtag("name", std::string_view(*name_)));
} else {
return ppii.pps()->pretty_struct
(ppii,
"DExpectFormalArgSsm",
refrtag("fstate", fstate_));
refrtag("fstate", fstate_),
refrtag("expect", this->get_expect_str())
);
}
}

6
src/reader2/DExpectFormalArglistSsm.cpp
View file

@ -287,6 +287,9 @@ namespace xo {
if (!pps->print_upto(xrefrtag("fastate", fastate_)))
return false;
if (!pps->print_upto(xrefrtag("expect", this->get_expect_str())))
return false;
if (!pps->print_upto(xrefrtag("n_args", n_args_)))
return false;
@ -311,6 +314,9 @@ namespace xo {
pps->newline_indent(ppii.ci1());
pps->pretty(refrtag("fastate", fastate_));
pps->newline_indent(ppii.ci1());
pps->pretty(refrtag("expect", this->get_expect_str()));
pps->newline_indent(ppii.ci1());
pps->pretty(refrtag("n_args", n_args_));

4
src/reader2/DLambdaSsm.cpp
View file

@ -463,12 +463,14 @@ namespace xo {
(ppii,
"DLambdaSsm",
refrtag("lmstate", lmstate_),
refrtag("expect", this->get_expect_str()),
refrtag("body", body));
} else {
return ppii.pps()->pretty_struct
(ppii,
"DLambdaSsm",
refrtag("lmstate", lmstate_));
refrtag("lmstate", lmstate_),
refrtag("expect", this->get_expect_str()));
}
}