diff options
| author | Maxime Dénès | 2017-07-28 18:14:00 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-07-28 18:14:00 +0200 |
| commit | b8f9a259ab0a24a73b477b9e75a6ea3b3cb47943 (patch) | |
| tree | 624879d01e3935fc8ce811536dff6db2a4466b2b /API | |
| parent | c2281e8c3b5103e49b7108a48259d18558b72f57 (diff) | |
| parent | 04c65cdb71e069d656a5253c6c47155566e563c7 (diff) | |
Merge PR #782: Update API for fiat
Diffstat (limited to 'API')
| -rw-r--r-- | API/API.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/API/API.mli b/API/API.mli index bb24d5768f..03b890a540 100644 --- a/API/API.mli +++ b/API/API.mli @@ -4626,6 +4626,7 @@ sig val get_current_proof_name : unit -> Names.Id.t [@@ocaml.deprecated "use Proof_global.get_current_proof_name"] + val current_proof_statement : unit -> Names.Id.t * Decl_kinds.goal_kind * EConstr.types end module Clenv : @@ -5401,6 +5402,8 @@ sig val pp_hints_path : hints_path -> Pp.std_ppcmds val glob_hints_path : Libnames.reference hints_path_gen -> Globnames.global_reference hints_path_gen + val run_hint : hint -> + ((raw_hint * Clenv.clausenv) hint_ast -> 'r Proofview.tactic) -> 'r Proofview.tactic val typeclasses_db : hint_db_name val add_hints_init : (unit -> unit) -> unit val create_hint_db : bool -> hint_db_name -> Names.transparent_state -> bool -> unit |