prepared visualize_parse for showing dependency labels

This commit is contained in:
aarne
2015-11-04 17:28:09 +00:00
parent 2ace6089e3
commit 1b7d61ea2e
3 changed files with 45 additions and 7 deletions

View File

@@ -597,6 +597,7 @@ pgfCommands = Map.fromList [
let gvOptions = GraphvizOptions {noLeaves = isOpt "noleaves" opts && not (isOpt "showleaves" opts),
noFun = isOpt "nofun" opts || not (isOpt "showfun" opts),
noCat = isOpt "nocat" opts && not (isOpt "showcat" opts),
noDep = True, ---- TODO
nodeFont = valStrOpts "nodefont" "" opts,
leafFont = valStrOpts "leaffont" "" opts,
nodeColor = valStrOpts "nodecolor" "" opts,