aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/conv_oracle.mli
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/conv_oracle.mli')
-rw-r--r--kernel/conv_oracle.mli3
1 files changed, 3 insertions, 0 deletions
diff --git a/kernel/conv_oracle.mli b/kernel/conv_oracle.mli
index 24797238d..cd8cd2cf7 100644
--- a/kernel/conv_oracle.mli
+++ b/kernel/conv_oracle.mli
@@ -35,5 +35,8 @@ val get_strategy : oracle -> 'a tableKey -> level
* Level of RelKey constant cannot be set. *)
val set_strategy : oracle -> 'a tableKey -> level -> oracle
+(** Fold over the non-transparent levels of the oracle. Order unspecified. *)
+val fold_strategy : (unit tableKey -> level -> 'a -> 'a) -> oracle -> 'a -> 'a
+
val get_transp_state : oracle -> transparent_state