This commit is contained in:
Simon Cruanes 2014-07-17 10:37:53 +02:00
parent b6168ca7f6
commit 462ac72b2e

View file

@ -65,7 +65,6 @@ let test_bfs () =
() ()
let rec pp_path p = let rec pp_path p =
let buf = Buffer.create 10 in
CCPrint.to_string (CCList.pp ~sep:"; " pp_edge) p CCPrint.to_string (CCList.pp ~sep:"; " pp_edge) p
and pp_edge b (v1,e,v2) = and pp_edge b (v1,e,v2) =
Printf.bprintf b "%d -> %d" v1 v2 Printf.bprintf b "%d -> %d" v1 v2