diff options
author | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2018-05-22 08:58:53 +0200 |
---|---|---|
committer | Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr> | 2018-06-17 11:23:16 +0200 |
commit | 9953fc3c125d0bdd39e3bd5801040f406f2e708f (patch) | |
tree | 11271e6cf966a915541f0fe7a33552e0ce3e6fa9 /kernel/cClosure.mli | |
parent | dfbfa6abc74199d88747430bdfc78f6ebda09dcb (diff) |
Faster and cleaner fconstr-to-constr conversion function.
We untangle the implementation in several ways.
- No higher-order self argument function as there is only one caller.
- Compute composition of lifts + substitution on terms using a dedicated
function instead of mk_clos followed by to_constr.
- Take more advantage of identity substitutions.
Diffstat (limited to 'kernel/cClosure.mli')
-rw-r--r-- | kernel/cClosure.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/cClosure.mli b/kernel/cClosure.mli index 63daa4a7c..f8f98f0ab 100644 --- a/kernel/cClosure.mli +++ b/kernel/cClosure.mli @@ -244,6 +244,6 @@ val kni: clos_infos -> fconstr infos_tab -> fconstr -> stack -> fconstr * stack val knr: clos_infos -> fconstr infos_tab -> fconstr -> stack -> fconstr * stack val kl : clos_infos -> fconstr infos_tab -> fconstr -> constr -val to_constr : (lift -> fconstr -> constr) -> lift -> fconstr -> constr +val to_constr : lift -> fconstr -> constr (** End of cbn debug section i*) |