Give all label a html context in dot backend

Before, atoms printed in the dot backend could either be in a html
label, or in a simple label, which caused some problems for escaping
special characters such as newlines. This commit fixes that problem by
having all labels be html labels in the dot output.
This commit is contained in:
Guillaume Bury 2017-07-19 00:16:37 +02:00
parent b405634b1d
commit 02aa16870c

View file

@ -69,7 +69,7 @@ module Make(S : Res.S)(A : Arg with type atom := S.atom and type lemma := S.lemm
id table_options color table (c, rule, rule_color, l)
let print_dot_res_node fmt id a =
Format.fprintf fmt "%s [label=\"%a\"];@\n" id A.print_atom a
Format.fprintf fmt "%s [label=<%a>];@\n" id A.print_atom a
let ttify f c = fun fmt () -> f fmt c