From 643e624909ecec7ba43326ff962b13c184991125 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Sat, 8 Mar 2014 02:44:21 +0100 Subject: Using HMaps in global references. --- library/nametab.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'library/nametab.ml') diff --git a/library/nametab.ml b/library/nametab.ml index 2863f6cae..08eb02c9d 100644 --- a/library/nametab.ml +++ b/library/nametab.ml @@ -324,7 +324,7 @@ let the_dirtab = ref (DirTab.empty : dirtab) (* Reversed name tables ***************************************************) (* This table translates extended_global_references back to section paths *) -module Globrevtab = Map.Make(ExtRefOrdered) +module Globrevtab = HMap.Make(ExtRefOrdered) type globrevtab = full_path Globrevtab.t let the_globrevtab = ref (Globrevtab.empty : globrevtab) -- cgit v1.2.3