refactor(frontends/lean/inductive_cmd): move auxiliary method to expr.h

This commit is contained in:
Leonardo de Moura 2014-10-18 15:11:26 -07:00
parent eb79af98ba
commit 6a31a79265
2 changed files with 4 additions and 5 deletions

View file

@ -404,11 +404,6 @@ struct inductive_cmd_fn {
} }
} }
// TODO(Leo): move to different file
static bool is_explicit(binder_info const & bi) {
return !bi.is_implicit() && !bi.is_strict_implicit() && !bi.is_inst_implicit();
}
/** \brief Replace every occurrences of the inductive datatypes (in decls) in \c type with a local constant */ /** \brief Replace every occurrences of the inductive datatypes (in decls) in \c type with a local constant */
expr fix_intro_rule_type(expr const & type, name_map<expr> const & ind_to_local) { expr fix_intro_rule_type(expr const & type, name_map<expr> const & ind_to_local) {
unsigned nparams = 0; // number of explicit parameters unsigned nparams = 0; // number of explicit parameters

View file

@ -240,6 +240,10 @@ inline binder_info mk_inst_implicit_binder_info() { return binder_info(false, fa
inline binder_info mk_cast_binder_info() { return binder_info(false, true); } inline binder_info mk_cast_binder_info() { return binder_info(false, true); }
inline binder_info mk_contextual_info(bool f) { return binder_info(false, false, f); } inline binder_info mk_contextual_info(bool f) { return binder_info(false, false, f); }
inline bool is_explicit(binder_info const & bi) {
return !bi.is_implicit() && !bi.is_strict_implicit() && !bi.is_inst_implicit();
}
bool operator==(binder_info const & i1, binder_info const & i2); bool operator==(binder_info const & i1, binder_info const & i2);
inline bool operator!=(binder_info const & i1, binder_info const & i2) { return !(i1 == i2); } inline bool operator!=(binder_info const & i1, binder_info const & i2) { return !(i1 == i2); }