sfos/ledger
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Corrected output of O_CALL nodes

Browse source
This commit is contained in:
John Wiegley 2009-02-27 14:06:52 -04:00
parent f7f07310f4
commit 0efe0c63ce
1 changed files with 5 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/op.cc
View file

@ -473,9 +473,11 @@ bool expr_t::op_t::print(std::ostream& out, const context_t& context) const
out << "("; out << "(";
if (left() && left()->print(out, context)) if (left() && left()->print(out, context))
found = true; found = true;
out << ", "; for (ptr_op_t next = right(); next; next = next->right()) {
if (has_right() && right()->print(out, context)) out << ", ";
found = true; if (next->print(out, context))
found = true;
}
out << ")"; out << ")";
} }
else if (left() && left()->print(out, context)) { else if (left() && left()->print(out, context)) {