diff options
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/declare.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/interp/declare.ml b/interp/declare.ml index 2b2ca36edc..a82e6b35a6 100644 --- a/interp/declare.ml +++ b/interp/declare.ml @@ -150,8 +150,8 @@ let register_side_effect (c, role) = ignore(add_leaf id o); update_tables c; match role with - | Safe_typing.Subproof -> () - | Safe_typing.Schema (ind, kind) -> !declare_scheme kind [|ind,c|] + | Subproof -> () + | Schema (ind, kind) -> !declare_scheme kind [|ind,c|] let declare_constant_common id cst = let o = inConstant cst in |