aboutsummaryrefslogtreecommitdiff
path: root/lib/util.ml
diff options
context:
space:
mode:
authorfilliatr1999-11-24 10:48:23 +0000
committerfilliatr1999-11-24 10:48:23 +0000
commitfed2f27b5d23e8dceac1ad8d95b2374d3b72eddf (patch)
tree7305d3c223f84b3abad02dcc84a6bd6d8c65a9a7 /lib/util.ml
parentf9676380178d7af90d8cdf64662866c82139f116 (diff)
Vernacinterp et Vernacentries (partiellement)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@133 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/util.ml')
-rw-r--r--lib/util.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/util.ml b/lib/util.ml
index d165c157b2..ed56f06d76 100644
--- a/lib/util.ml
+++ b/lib/util.ml
@@ -49,6 +49,8 @@ let parse_section_path s =
let id,k = decoupe_kind n in
dirs,id,k
+module Stringset = Set.Make(struct type t = string let compare = compare end)
+
module Stringmap = Map.Make(struct type t = string let compare = compare end)
let stringmap_to_list m = Stringmap.fold (fun s y l -> (s,y)::l) m []