summaryrefslogtreecommitdiff
path: root/src/runtime/haskell/PGF/VisualizeTree.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/runtime/haskell/PGF/VisualizeTree.hs')
-rw-r--r--src/runtime/haskell/PGF/VisualizeTree.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/runtime/haskell/PGF/VisualizeTree.hs b/src/runtime/haskell/PGF/VisualizeTree.hs
index c9a5686fc..0cb323b92 100644
--- a/src/runtime/haskell/PGF/VisualizeTree.hs
+++ b/src/runtime/haskell/PGF/VisualizeTree.hs
@@ -17,6 +17,7 @@
module PGF.VisualizeTree
( GraphvizOptions(..)
+ , graphvizDefaults
, graphvizAbstractTree
, graphvizParseTree
, graphvizParseTreeOld
@@ -58,6 +59,8 @@ data GraphvizOptions = GraphvizOptions {noLeaves :: Bool,
leafEdgeStyle :: String
}
+graphvizDefaults = GraphvizOptions False False False "" "" "" "" "" ""
+
-- | Renders abstract syntax tree in Graphviz format
graphvizAbstractTree :: PGF -> (Bool,Bool) -> Tree -> String