38 lines
977 B
C++
38 lines
977 B
C++
/*
|
|
Copyright (c) 2014 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
|
|
Author: Leonardo de Moura
|
|
*/
|
|
#include <limits>
|
|
#include "library/explicit.h"
|
|
#include "library/tactic/intros_tactic.h"
|
|
#include "frontends/lean/parser.h"
|
|
#include "frontends/lean/parse_table.h"
|
|
|
|
#define LEAN_APPLY_RBP 16 // it should be bigger than `;` (and_then) precedence
|
|
|
|
namespace lean {
|
|
using notation::transition;
|
|
using notation::mk_ext_action;
|
|
|
|
static expr parse_intros(parser & p, unsigned, expr const *, pos_info const & pos) {
|
|
buffer<name> ns;
|
|
while (p.curr_is_identifier()) {
|
|
ns.push_back(p.get_name_val());
|
|
p.next();
|
|
}
|
|
return p.save_pos(mk_intros_tactic_macro(ns), pos);
|
|
}
|
|
|
|
void init_nud_tactic_table(parse_table & r) {
|
|
expr x0 = mk_var(0);
|
|
r = r.add({transition("intros", mk_ext_action(parse_intros))}, x0);
|
|
}
|
|
|
|
void initialize_builtin_tactics() {
|
|
}
|
|
|
|
void finalize_builtin_tactics() {
|
|
}
|
|
}
|