diff options
Diffstat (limited to 'checker/univ.ml')
-rw-r--r-- | checker/univ.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/checker/univ.ml b/checker/univ.ml index a895021f0..323a373ec 100644 --- a/checker/univ.ml +++ b/checker/univ.ml @@ -432,7 +432,7 @@ struct include Hashcons.Make(ExprHash) let make = - Hashcons.simple_hcons generate Level.hcons + Hashcons.simple_hcons generate hcons Level.hcons let hash = ExprHash.hash let uid = hash let equal x y = x == y || @@ -1242,7 +1242,7 @@ struct module HInstance = Hashcons.Make(HInstancestruct) - let hcons = Hashcons.simple_hcons HInstance.generate Level.hcons + let hcons = Hashcons.simple_hcons HInstance.generate HInstance.hcons Level.hcons let empty = hcons [||] |