Import Upstream version 20180207
[hcoop/debian/mlton.git] / lib / mlton / directed-graph / classify-edges.sig
1 (* Copyright (C) 1999-2005 Henry Cejtin, Matthew Fluet, Suresh
2 * Jagannathan, and Stephen Weeks.
3 *
4 * MLton is released under a BSD-style license.
5 * See the file MLton-LICENSE for details.
6 *)
7
8 val classifyEdges: Graph.t -> {discover: Graph.Node.t -> int,
9 finish: Graph.Node.t -> int}
10 -> {tree: Graph.Edge.t list ref,
11 forward: Graph.Edge.t list ref,
12 back: Graph.Edge.t list ref,
13 cross: Graph.Edge.t list ref}
14 * Param.t