diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-07-16 16:17:30 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2017-07-16 16:24:06 +0200 |
| commit | 9aca7ad9a0f98bcd88df6e72333780db215a3a9c (patch) | |
| tree | 333c908edc74e15d6ffdcff8c158cc97a090197b /dev/base_include | |
| parent | e3eb17a728d7b6874e67462e8a83fac436441872 (diff) | |
Adapting to 91df40272 (body_of_constant_body moved to global).
Diffstat (limited to 'dev/base_include')
| -rw-r--r-- | dev/base_include | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dev/base_include b/dev/base_include index 8ee1cceb2..bfbf6bb5d 100644 --- a/dev/base_include +++ b/dev/base_include @@ -215,7 +215,7 @@ open Declareops;; let constbody_of_string s = let b = Global.lookup_constant (Nametab.locate_constant (qualid_of_string s)) in - Option.get (Declareops.body_of_constant Opaqueproof.empty_opaquetab b);; + Option.get (Global.body_of_constant_body b);; (* Get the current goal *) (* |