michael/lean2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(util/sexpr/format): add check_system at formatter

Browse source
This commit is contained in:
Leonardo de Moura 2015-04-27 14:21:25 -07:00
parent 17c07cdb02
commit a3c3a94a51
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/util/sexpr/format.cpp
View file

@ -116,6 +116,7 @@ format const & dot() { return *g_dot; }
LEAN_THREAD_VALUE(bool, g_diff_flatten, false);
//
sexpr format::flatten(sexpr const & s) {
check_system("formatter");
lean_assert(is_cons(s));
switch (sexpr_kind(s)) {
case format_kind::NIL:
@ -265,6 +266,7 @@ std::ostream & format::pretty(std::ostream & out, unsigned w, bool colors, forma
std::vector<pair<sexpr, unsigned>> todo;
todo.push_back(std::make_pair(f.m_value, 0));
while (!todo.empty()) {
check_system("formatter");
auto pair = todo.back();
sexpr s = pair.first;
unsigned indent = pair.second;
@ -355,6 +357,7 @@ format pp(name const & n) {
struct sexpr_pp_fn {
format apply(sexpr const & s) {
check_system("formatter");
switch (s.kind()) {
case sexpr_kind::Nil: return format("nil");
case sexpr_kind::String: {