summaryrefslogtreecommitdiff
path: root/stdlib/digest.ml
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/digest.ml')
-rw-r--r--stdlib/digest.ml3
1 files changed, 2 insertions, 1 deletions
diff --git a/stdlib/digest.ml b/stdlib/digest.ml
index 7d69141561..47c7e65a7a 100644
--- a/stdlib/digest.ml
+++ b/stdlib/digest.ml
@@ -17,6 +17,8 @@
type t = string
+let compare = String.compare
+
external unsafe_string: string -> int -> int -> t = "caml_md5_string"
external channel: in_channel -> int -> t = "caml_md5_chan"
@@ -48,4 +50,3 @@ let to_hex d =
String.blit (Printf.sprintf "%02x" (int_of_char d.[i])) 0 result (2*i) 2;
done;
result
-;;