aboutsummaryrefslogtreecommitdiffhomepage
path: root/plugins/ssr/ssrview.mli
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2018-06-23 17:09:47 +0200
committerGravatar Maxime Dénès <mail@maximedenes.fr>2018-06-23 17:09:47 +0200
commit7836f9319f17a642921cbf9b153077fc195ca8e1 (patch)
tree70dc89c80436adcfde89e2c0a02cf5163fb77266 /plugins/ssr/ssrview.mli
parentddd99ca6b4a23286405ec995379e4b07d42b0f78 (diff)
parentdb2147fe29ca5d805f94e1a61f8a568dcd9b620f (diff)
Merge PR #7236: [ssr] simpler semantics for delayed clears
Diffstat (limited to 'plugins/ssr/ssrview.mli')
-rw-r--r--plugins/ssr/ssrview.mli6
1 files changed, 4 insertions, 2 deletions
diff --git a/plugins/ssr/ssrview.mli b/plugins/ssr/ssrview.mli
index be51fe7f9..b128a95da 100644
--- a/plugins/ssr/ssrview.mli
+++ b/plugins/ssr/ssrview.mli
@@ -20,9 +20,11 @@ module AdaptorDb : sig
end
-(* Apply views to the top of the stack (intro pattern) *)
+(* Apply views to the top of the stack (intro pattern). If clear_if_id is
+ * true (default false) then views that happen to be a variable are considered
+ * as to be cleared (see the to_clear argument to the continuation) *)
val tclIPAT_VIEWS :
- views:ast_closure_term list ->
+ views:ast_closure_term list -> ?clear_if_id:bool ->
conclusion:(to_clear:Names.Id.t list -> unit Proofview.tactic) ->
unit Proofview.tactic