improved documentation of vp -showdep

2015-11-05 08:23:33 +00:00
parent 0786dc6f42
commit eb49b6ab56
2 changed files with 9 additions and 8 deletions
--- a/src/runtime/haskell/PGF/VisualizeTree.hs
+++ b/src/runtime/haskell/PGF/VisualizeTree.hs
@@ -300,7 +300,7 @@ graphvizBracketedString opts mbl tree bss = render graphviz_code
          "head" -> ""
          l -> l
        _ -> argLabel fun arg
-      argLabel fun arg = showCId fun ++ "#" ++ show arg
+      argLabel fun arg = "dep#" ++ show arg --showCId fun ++ "#" ++ show arg

      mkLeafNode cat word
       | noDep opts = word        --- || not (noCat opts) -- show POS only if intermediate nodes hidden