aboutsummaryrefslogtreecommitdiff
path: root/plugins/funind
diff options
context:
space:
mode:
authorGaëtan Gilbert2020-07-02 14:36:13 +0200
committerGaëtan Gilbert2020-07-02 14:36:13 +0200
commite04fbe4eb39434f50cf6bdf19f6c4be46b73ef44 (patch)
tree8dba5a55cdcbac1921cb08868809d6aa8f2a1279 /plugins/funind
parent2fc9f27449ed21f2cbb440b4684a56622cb2d064 (diff)
parent4a6a94d60f258bbcbf843af0c60d4c7d810750aa (diff)
Merge PR #12620: [state] Consolidate state handling into Vernacstate
Reviewed-by: SkySkimmer Reviewed-by: gares
Diffstat (limited to 'plugins/funind')
-rw-r--r--plugins/funind/gen_principle.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/funind/gen_principle.ml b/plugins/funind/gen_principle.ml
index 167cf37026..dcca694200 100644
--- a/plugins/funind/gen_principle.ml
+++ b/plugins/funind/gen_principle.ml
@@ -70,7 +70,7 @@ let build_newrecursive lnameargsardef =
CErrors.user_err ~hdr:"Function"
(Pp.str "Body of Function must be given")
in
- States.with_state_protection (List.map f) lnameargsardef
+ Vernacstate.System.protect (List.map f) lnameargsardef
in
(recdef, rec_impls)