cce88c6190
After this commit, new interactice tactic classes can be added without
writing C++ code (see example: tests/lean/run/my_tac_class.lean).
The tactic_evaluator was simplified, and all the complexity has been
moved to tactic_notation, and lean code.
We can now inspect the intermediate states produced by the rewrite
tactic.
The function (@scope_trace _ line col thunk) can be used to position trace
messages produced by thunk. If line/col are not provided (i.e., we
just write (scope_trace thunk)), then line/col are filled with the
position of this term by the elaborator.
We can visualize the intermediate tactic states inside nested blocks
such as (try { ... })
The new infrastructure can be used to implement custom tactic_state
pretty printers.
30 lines
1.2 KiB
C++
30 lines
1.2 KiB
C++
/*
|
|
Copyright (c) 2017 Microsoft Corporation. All rights reserved.
|
|
Released under Apache 2.0 license as described in the file LICENSE.
|
|
|
|
Author: Leonardo de Moura
|
|
*/
|
|
#pragma once
|
|
#include "library/tactic/tactic_state.h"
|
|
#include "frontends/lean/info_manager.h"
|
|
|
|
namespace lean {
|
|
[[noreturn]] void throw_unsolved_tactic_state(tactic_state const & ts, format const & fmt, expr const & ref);
|
|
[[noreturn]] void throw_unsolved_tactic_state(tactic_state const & ts, char const * msg, expr const & ref);
|
|
|
|
class tactic_evaluator {
|
|
type_context & m_ctx;
|
|
info_manager & m_info;
|
|
options const & m_opts;
|
|
|
|
environment compile_tactic(name const & tactic_name, expr const & tactic);
|
|
vm_obj invoke_tactic(vm_state & S, name const & tactic_name, std::initializer_list<vm_obj> const & args);
|
|
|
|
tactic_state execute_tactic(expr const & tactic, tactic_state const & s, expr const & ref);
|
|
tactic_state execute_atomic(tactic_state const & s, expr const & tactic, expr const & ref);
|
|
public:
|
|
tactic_evaluator(type_context & ctx, info_manager & info, options const & opts);
|
|
|
|
tactic_state operator()(tactic_state const & s, expr const & tactic, expr const & ref);
|
|
};
|
|
}
|