diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2016-10-19 14:46:25 +0200 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2016-10-19 14:49:57 +0200 |
commit | 6fbe3c850bac9cbdfa64dbdcca7bd60dc7862190 (patch) | |
tree | 0e1ffc91f1ba28428c8908995108d05bd9835c33 /kernel/vconv.ml | |
parent | 1124ff6dd8fe4d04de8321375de101a42a2131f8 (diff) |
More comments in VM.
Diffstat (limited to 'kernel/vconv.ml')
-rw-r--r-- | kernel/vconv.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/kernel/vconv.ml b/kernel/vconv.ml index 894f5296a..74d956bef 100644 --- a/kernel/vconv.ml +++ b/kernel/vconv.ml @@ -77,6 +77,7 @@ and conv_whd env pb k whd1 whd2 cu = | Vatom_stk(a1,stk1), Vatom_stk(a2,stk2) -> conv_atom env pb k a1 stk1 a2 stk2 cu | Vfun _, _ | _, Vfun _ -> + (* on the fly eta expansion *) conv_val env CONV (k+1) (apply_whd k whd1) (apply_whd k whd2) cu | Vsort _, _ | Vprod _, _ | Vfix _, _ | Vcofix _, _ | Vconstr_const _, _ |