diff options
| author | Enrico Tassi | 2014-02-24 11:40:32 +0100 |
|---|---|---|
| committer | Enrico Tassi | 2014-02-26 14:53:08 +0100 |
| commit | d002d775f76ddab45983354022a0f8c59b1af313 (patch) | |
| tree | c60111f1a613cd9e86bd666ac501fb0986a9a3d5 /kernel | |
| parent | 2145e0274482017dc8e16c8ee774bc422be930e1 (diff) | |
remoteCounter: backup/restore
When you resume the compilation of a .vi file, you want to
avoid collisions on fresh names.
Diffstat (limited to 'kernel')
| -rw-r--r-- | kernel/univ.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/univ.ml b/kernel/univ.ml index 062196b395..fe872db8b9 100644 --- a/kernel/univ.ml +++ b/kernel/univ.ml @@ -893,7 +893,7 @@ let sort_universes orig = (* Temporary inductive type levels *) let fresh_local_univ, set_remote_fresh_local_univ = - RemoteCounter.new_counter 0 ~incr:((+) 1) + RemoteCounter.new_counter ~name:"local_univ" 0 ~incr:((+) 1) ~build:(fun n -> Atom (UniverseLevel.Level (n, Names.DirPath.empty))) (* Miscellaneous functions to remove or test local univ assumed to |