sig type t = OUnitTest.path val compare : 'a -> 'a -> int val to_string : OUnitTest.node list -> string end