diff options
| author | Maxime Dénès | 2018-01-17 15:16:39 +0100 |
|---|---|---|
| committer | Maxime Dénès | 2018-01-17 15:16:39 +0100 |
| commit | d4f965678dcffb836fb9cf8790e3e969d3bfc364 (patch) | |
| tree | 5f3afebbfc26d2215d331c6c61e5e425d5b2f82d /checker/closure.ml | |
| parent | e77fa3a6226926cca7893c4fbc620bcf2372698e (diff) | |
| parent | 20481a3f3405f04b47c7865ca2788a6f63660443 (diff) | |
Merge PR #6584: Implement the strategy mechanism in the checker
Diffstat (limited to 'checker/closure.ml')
| -rw-r--r-- | checker/closure.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/checker/closure.ml b/checker/closure.ml index 3a56bba015..98f8c4a826 100644 --- a/checker/closure.ml +++ b/checker/closure.ml @@ -822,6 +822,7 @@ type clos_infos = fconstr infos let infos_env x = x.i_env let infos_flags x = x.i_flags +let oracle_of_infos x = x.i_env.env_conv_oracle let create_clos_infos flgs env = create (fun _ -> inject) flgs env |