diff options
| author | Maxime Dénès | 2018-05-06 17:19:58 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2018-05-06 17:19:58 +0200 |
| commit | dad4731deed5c09e4e6cb212cd81462f7896c363 (patch) | |
| tree | 413c52bbb7c67c228e20434ef2dfd6bd59c86753 /interp/impargs.ml | |
| parent | 87c959542e1bed55b14d371f1be02cd60d89082c (diff) | |
| parent | afceace455a4b37ced7e29175ca3424996195f7b (diff) | |
Merge PR #6156: [api] Rename `global_reference` to `GlobRef.t` to follow kernel style.
Diffstat (limited to 'interp/impargs.ml')
| -rw-r--r-- | interp/impargs.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/interp/impargs.ml b/interp/impargs.ml index b424f73dea..7e4c4ef4f7 100644 --- a/interp/impargs.ml +++ b/interp/impargs.ml @@ -505,7 +505,7 @@ type implicit_discharge_request = | ImplLocal | ImplConstant of Constant.t * implicits_flags | ImplMutualInductive of MutInd.t * implicits_flags - | ImplInteractive of global_reference * implicits_flags * + | ImplInteractive of GlobRef.t * implicits_flags * implicit_interactive_request let implicits_table = Summary.ref Refmap.empty ~name:"implicits" @@ -626,7 +626,7 @@ let classify_implicits (req,_ as obj) = match req with type implicits_obj = implicit_discharge_request * - (global_reference * implicits_list list) list + (GlobRef.t * implicits_list list) list let inImplicits : implicits_obj -> obj = declare_object {(default_object "IMPLICITS") with |