diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2017-11-06 22:52:20 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2017-11-06 22:52:20 +0100 |
| commit | 0d81e80a09db7d352408be4dfc5ba263f6ed98ef (patch) | |
| tree | 2754ab2c5b6fb039b02fbe096940b112039f4e50 /library/lib.ml | |
| parent | e029cf5b417b22ebc65a8193469bbbe450f725ce (diff) | |
| parent | c71e69a9be2094061e041d60614b090c8381f0b7 (diff) | |
Merge PR #6064: [api] Deprecate all legacy uses of Name.Id in core.
Diffstat (limited to 'library/lib.ml')
| -rw-r--r-- | library/lib.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/lib.ml b/library/lib.ml index 5418003eb..e95bb47f2 100644 --- a/library/lib.ml +++ b/library/lib.ml @@ -505,7 +505,7 @@ let variable_section_segment_of_reference = function let section_instance = function | VarRef id -> let eq = function - | Variable (id',_,_,_) -> Names.id_eq id id' + | Variable (id',_,_,_) -> Names.Id.equal id id' | Context _ -> false in if List.exists eq (pi1 (List.hd !sectab)) |