diff options
| author |  Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-02-24 11:40:32 +0100 |
|---|---|---|
| committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2014-02-26 14:53:08 +0100 |
| commit | d002d775f76ddab45983354022a0f8c59b1af313 (patch) | |
| tree | c60111f1a613cd9e86bd666ac501fb0986a9a3d5 /pretyping | |
| 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 'pretyping')
| -rw-r--r-- | pretyping/termops.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/termops.ml b/pretyping/termops.ml index 781bd599c..6972f307b 100644 --- a/pretyping/termops.ml +++ b/pretyping/termops.ml @@ -150,7 +150,7 @@ let print_env env = let set_module m = current_module := m*) let new_univ_level, set_remote_new_univ_level = - RemoteCounter.new_counter 0 ~incr:((+) 1) + RemoteCounter.new_counter ~name:"univ_level" 0 ~incr:((+) 1) ~build:(fun n -> Univ.UniverseLevel.make (Lib.library_dp()) n) let new_univ () = Univ.Universe.make (new_univ_level ()) |