[/] [trunk/] [src/] [graphviz/] [win-graphviz.sml] - Rev 7

(* $Id: win-graphviz.sml 7 2007-10-31 05:39:12Z tbourke $ *)

structure Graphviz = Graphviz (
          type t = TypedDot.graph
          val output = TypedDotIO.output
          val warn = fn msgs => TextIO.output (TextIO.stdErr,concat msgs ^"\n")

          structure Plain = TextPlain
          structure OpSys = Windows
        )