# SCM Repository

# View of /sml/trunk/src/MLRISC/graphs/trans-reduction.sml

Parent Directory | Revision Log

Revision

File size: 338 byte(s)

**651**- (**download**) (**annotate**)*Thu Jun 1 18:34:03 2000 UTC*(19 years, 2 months ago) by*monnier*File size: 338 byte(s)

bring revisions from the vendor branch to the trunk

(* * Compute the (in place) transitive reduction of a graph. * * -- Allen *) signature TRANSITIVE_REDUCTION = sig val transitive_reduction : ('n,'e,'g) Graph.graph -> unit end structure TransitiveReduction : TRANSITIVE_REDUCTION = struct structure G = Graph fun transitive_reduction (G.GRAPH G) = let in end end

root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |

Powered by ViewVC 1.0.0 |