summaryrefslogtreecommitdiff
path: root/bytecomp/matching.ml
diff options
context:
space:
mode:
Diffstat (limited to 'bytecomp/matching.ml')
-rw-r--r--bytecomp/matching.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/bytecomp/matching.ml b/bytecomp/matching.ml
index d559549592..25013a6578 100644
--- a/bytecomp/matching.ml
+++ b/bytecomp/matching.ml
@@ -467,6 +467,7 @@ module StoreExp =
(struct
type t = lambda
type key = lambda
+ let compare_key = Pervasives.compare
let make_key = Lambda.make_key
end)