diff options
Diffstat (limited to 'pretyping/cbv.ml')
-rw-r--r-- | pretyping/cbv.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/cbv.ml b/pretyping/cbv.ml index 0e7804bc7..740175688 100644 --- a/pretyping/cbv.ml +++ b/pretyping/cbv.ml @@ -232,7 +232,7 @@ let rec norm_head info env t stack = let env' = subs_cons ([|cbv_stack_term info TOP env b|],env) in norm_head info env' c stack else - (CBN(t,env), stack) (* Considérer une coupure commutative ? *) + (CBN(t,env), stack) (* Should we consider a commutative cut ? *) | Evar ev -> (match evar_value info.i_cache ev with |