diff options
| author |  Guillaume Melquiond <guillaume.melquiond@inria.fr> | 2016-01-02 16:52:33 +0100 |
|---|---|---|
| committer | Guillaume Melquiond <guillaume.melquiond@inria.fr> | 2016-01-02 16:52:33 +0100 |
| commit | 82ac0604888679bc2fbdeda9ac264d7cd10f7928 (patch) | |
| tree | 49d0a387c5345f17f3b18e82e5a2704e3487b5c7 /kernel/nativelambda.ml | |
| parent | 2c8275ee3e0e5cd4eb8afd24047fda7f864e0e4e (diff) | |
Avoid warnings about loop indices.
Diffstat (limited to 'kernel/nativelambda.ml')
| -rw-r--r-- | kernel/nativelambda.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/nativelambda.ml b/kernel/nativelambda.ml index 4d033bc99..3ff9b5702 100644 --- a/kernel/nativelambda.ml +++ b/kernel/nativelambda.ml @@ -485,7 +485,7 @@ module Renv = let pop env = Vect.pop env.name_rel let popn env n = - for i = 1 to n do pop env done + for _i = 1 to n do pop env done let get env n = Lrel (Vect.get_last env.name_rel (n-1), n) |