ghc-vis 0.6 → 0.6.1

raw patch · 2 files changed

+13/−13 lines, 2 filesdep +containersdep ~SDLdep ~basedep ~cairo

Dependencies added: containers

Dependency ranges changed: SDL, base, cairo, deepseq, fgl, ghc-heap-view, graphviz, mtl, text, transformers, xdot

Files

• ghc-vis.cabal +12/−12
• src/GHC/Vis/View/Graph/Parser.hs +1/−1

@@ -1,5 +1,5 @@ name:               ghc-vis-version:            0.6+version:            0.6.1 license:            BSD3 license-file:       LICENSE category:           GHC, Debug, Development@@ -40,22 +40,23 @@   Exposed-modules: GHC.Vis   Other-modules: GHC.Vis.Internal GHC.Vis.Types GHC.Vis.View.List GHC.Vis.View.Common Paths_ghc_vis   Default-Language: Haskell2010-  Build-depends: base == 4.*,-                 mtl >= 2.0,-                 fgl,-                 deepseq,-                 text,-                 transformers,+  Build-depends: base == 4.6.*,+                 mtl >= 2.0 && < 2.2,+                 fgl == 5.4.*,+                 deepseq == 1.3.*,+                 text == 0.11.*,+                 transformers == 0.3.*,+                 containers >= 0.4 && < 0.6,                  gtk == 0.12.*,                  cairo == 0.12.*,-                 ghc-heap-view >= 0.3.0.3+                 ghc-heap-view == 0.4.*   Hs-source-dirs: src/   Ghc-options: -Wall -fno-warn-unused-do-bind    if flag(graph)       Other-modules: GHC.Vis.View.Graph.Parser GHC.Vis.View.Graph-      Build-depends: graphviz >= 2999.14.1.0,-                     xdot >= 0.2+      Build-depends: graphviz == 2999.16.*,+                     xdot == 0.2.*       Cpp-options: -DGRAPH_VIEW    if flag(full)@@ -63,8 +64,7 @@       Cpp-options: -DFULL_WINDOW    if flag(sdl)-      Build-depends: SDL >= 0.6,-                     cairo >= 0.12.4+      Build-depends: SDL == 0.6.*       Cpp-options: -DSDL_WINDOW  source-repository head

@@ -123,7 +123,7 @@ defaultVis = graphToDot nonClusteredParams   -- Somehow (X11Color Transparency) is white, use (RGBA 0 0 0 0) instead   -- Ordering OutEdges is not strong enough to force edge ordering, might not look good anyway-  { globalAttributes = [GraphAttrs [BgColor [RGBA 0 0 0 0], FontName fontName, FontSize graphFontSize]]+  { globalAttributes = [GraphAttrs [BgColor [toWC $ RGBA 0 0 0 0], FontName fontName, FontSize graphFontSize]]   , fmtNode = \ (_,l) -> [toLabel l, FontName fontName, FontSize nodeFontSize]   --, fmtNode = \ (_,l) -> [toLabel l, FontName fontName, FontSize nodeFontSize, Style [SItem Filled []], FillColor [RGBA 255 255 255 255], Color [RGBA 0 0 0 255]]   --, fmtNode = \ (_,l) -> [toLabel l, FontName fontName, FontSize nodeFontSize, Shape PlainText]