diff options
author | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-03-19 19:10:43 +0100 |
---|---|---|
committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2014-03-19 21:04:25 +0100 |
commit | 2d015514b890c2c6f5506fa15c5b592209a590ae (patch) | |
tree | 7007e9454c587ea6496d3c4d24b5e808aaa785de /kernel/conv_oracle.mli | |
parent | 53138852926664706193f09d013d3e8087f7bc8f (diff) |
Adding a Print Strategy vernacular command. It allows to check the
transparent status of variables and constants.
Diffstat (limited to 'kernel/conv_oracle.mli')
-rw-r--r-- | kernel/conv_oracle.mli | 3 |
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 |