diff --git a/devel_tools/ocamldep_transitive_closure.ml b/devel_tools/ocamldep_transitive_closure.ml
index c14aace6a12959ce4b475e66999282221541bd9d..9f7e383573055866bf377d20dd4fd2aaccb0fb92 100644
--- a/devel_tools/ocamldep_transitive_closure.ml
+++ b/devel_tools/ocamldep_transitive_closure.ml
@@ -7,7 +7,7 @@ let root = ref ""
 module Dep_graph = Graph.Imperative.Digraph.Concrete(
   struct
     type t = string
-    let compare = Transitioning.Stdlib.compare
+    let compare = String.compare
     let hash = Hashtbl.hash
     let equal = (=)
   end)