aboutsummaryrefslogtreecommitdiff
path: root/kernel/nativevalues.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/nativevalues.ml')
-rw-r--r--kernel/nativevalues.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/nativevalues.ml b/kernel/nativevalues.ml
index c3e2b3ab75..98094f7955 100644
--- a/kernel/nativevalues.ml
+++ b/kernel/nativevalues.ml
@@ -39,7 +39,7 @@ let eq_annot_sw asw1 asw2 =
open Hashset.Combine
let hash_annot_sw asw =
- combine (Hashtbl.hash asw.asw_ind) (Hashtbl.hash asw.asw_prefix)
+ combine (ind_hash asw.asw_ind) (String.hash asw.asw_prefix)
type sort_annot = string * int