C++ (Cpp) visit_let Examples

Example #1

File: unfold_macros.cpp Project: GallagherCommaJack/lean

    expr visit(expr const & e) {
        switch (e.kind()) {
        case expr_kind::Sort:  case expr_kind::Constant:
        case expr_kind::Var:   case expr_kind::Meta:
        case expr_kind::Local:
            return e;
        default:
            break;
        }

        check_system("unfold macros");
        auto it = m_cache.find(e);
        if (it != m_cache.end())
            return it->second;

        switch (e.kind()) {
        case expr_kind::Sort:  case expr_kind::Constant:
        case expr_kind::Var:   case expr_kind::Meta:
        case expr_kind::Local:
            lean_unreachable();
        case expr_kind::Macro:
            return save_result(e, visit_macro(e));
        case expr_kind::App:
            return save_result(e, visit_app(e));
        case expr_kind::Lambda: case expr_kind::Pi:
            return save_result(e, visit_binding(e));
        case expr_kind::Let:
            return save_result(e, visit_let(e));
        }
        lean_unreachable();
    }

Example #2

File: replace_visitor.cpp Project: GallagherCommaJack/lean

expr replace_visitor::visit(expr const & e) {
    check_system("expression replacer");
    bool shared = false;
    if (is_shared(e)) {
        shared = true;
        auto it = m_cache.find(e);
        if (it != m_cache.end())
            return it->second;
    }

    switch (e.kind()) {
    case expr_kind::Sort:      return save_result(e, visit_sort(e), shared);
    case expr_kind::Macro:     return save_result(e, visit_macro(e), shared);
    case expr_kind::Constant:  return save_result(e, visit_constant(e), shared);
    case expr_kind::Var:       return save_result(e, visit_var(e), shared);
    case expr_kind::Meta:      return save_result(e, visit_meta(e), shared);
    case expr_kind::Local:     return save_result(e, visit_local(e), shared);
    case expr_kind::App:       return save_result(e, visit_app(e), shared);
    case expr_kind::Lambda:    return save_result(e, visit_lambda(e), shared);
    case expr_kind::Pi:        return save_result(e, visit_pi(e), shared);
    case expr_kind::Let:       return save_result(e, visit_let(e), shared);
    }

    lean_unreachable(); // LCOV_EXCL_LINE
}

Example #3

File: noncomputable.cpp Project: avigad/lean

 void visit(expr const & e) {
     switch (e.kind()) {
     case expr_kind::Sort:      return;
     case expr_kind::Macro:     visit_macro(e);    return;
     case expr_kind::Constant:  visit_constant(e); return;
     case expr_kind::Var:       lean_unreachable();
     case expr_kind::Meta:      lean_unreachable();
     case expr_kind::Local:     return;
     case expr_kind::App:       visit_app(e);      return;
     case expr_kind::Lambda:    visit_binding(e);  return;
     case expr_kind::Pi:        visit_binding(e);  return;
     case expr_kind::Let:       visit_let(e);      return;
     }
 }