gistfile1.mly

let deps = [
    ("a", []), ("b", []), ("c", [ "a", "b" ]), ("d", [ "b" ]), ("e", [ "d" ])
] in
let data = List.map (fun r -> r, new mock_package (fst r) (snd r)) deps in
let pkgs = Core_hashtbl.of_alist data in
let [ a, b, c, d, e ] = List.map snd data in
...