diff options
author | Emilio Jesus Gallego Arias <e+git@x80.org> | 2018-03-11 20:29:16 +0100 |
---|---|---|
committer | Emilio Jesus Gallego Arias <e+git@x80.org> | 2018-03-28 14:16:52 +0200 |
commit | 0ade32f84b28d2190360ec79520788142755b5b7 (patch) | |
tree | 46b2d11c817707c3b84653b490de3b0aaad42038 /checker/closure.ml | |
parent | bd8606189268c3fcdd3506872d459cb9032a33bf (diff) |
[api] Deprecate a couple of aliases that we missed.
Diffstat (limited to 'checker/closure.ml')
-rw-r--r-- | checker/closure.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/checker/closure.ml b/checker/closure.ml index 184af0e13..bfba6c161 100644 --- a/checker/closure.ml +++ b/checker/closure.ml @@ -251,7 +251,7 @@ and fterm = | FInd of pinductive | FConstruct of pconstructor | FApp of fconstr * fconstr array - | FProj of projection * fconstr + | FProj of Projection.t * fconstr | FFix of fixpoint * fconstr subs | FCoFix of cofixpoint * fconstr subs | FCaseT of case_info * constr * fconstr * constr array * fconstr subs (* predicate and branches are closures *) @@ -281,7 +281,7 @@ let update v1 (no,t) = type stack_member = | Zapp of fconstr array | ZcaseT of case_info * constr * constr array * fconstr subs - | Zproj of int * int * projection + | Zproj of int * int * Projection.t | Zfix of fconstr * stack | Zshift of int | Zupdate of fconstr |