aboutsummaryrefslogtreecommitdiffhomepage
path: root/library/states.ml
diff options
context:
space:
mode:
Diffstat (limited to 'library/states.ml')
-rw-r--r--library/states.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/library/states.ml b/library/states.ml
index a06e7ce80..ea4e7d43c 100644
--- a/library/states.ml
+++ b/library/states.ml
@@ -39,4 +39,4 @@ let with_state_protection f x =
with reraise ->
(unfreeze st; raise reraise)
-
+let with_state_protection_on_exception = Future.transactify