Version 0.0.2

[guestfs-browser.git] / utils.ml

diff --git a/utils.ml b/utils.ml
index a3eca86..94a59a0 100644 (file)
--- a/utils.ml
+++ b/utils.ml
@@ -60,3 +60,5 @@ let human_size_1k i =
     sprintf "%.1fM" (Int64.to_float i /. 1024.)
   else
     sprintf "%.1fG" (Int64.to_float i /. 1024. /. 1024.)
+
+let unique = let i = ref 0 in fun () -> incr i; !i