aboutsummaryrefslogtreecommitdiff
path: root/lib/flags.ml
diff options
context:
space:
mode:
authorppedrot2012-11-13 23:00:11 +0000
committerppedrot2012-11-13 23:00:11 +0000
commite41da6e5e792cda94f2334ddc9a3140e792d5ef9 (patch)
tree9205d4328c314191fa2250391999d68c0f015486 /lib/flags.ml
parent98f3621b5b0c50aaa48c86e1d6a4269d94388bd3 (diff)
Small uniformization in String
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15970 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib/flags.ml')
-rw-r--r--lib/flags.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/flags.ml b/lib/flags.ml
index 4ec3787931..ffb324d535 100644
--- a/lib/flags.ml
+++ b/lib/flags.ml
@@ -104,7 +104,7 @@ let print_hyps_limit () = !print_hyps_limit
module StringOrd =
struct
type t = string
- let compare (x : t) (y : t) = String.compare x y
+ let compare = String.compare
end
module Stringset = Set.Make(StringOrd)