simon/sidekick
1
0
Fork 0
mirror of https://github.com/c-cube/sidekick.git synced 2025-12-06 11:15:43 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Correctly print edges in dot backend

Browse source 
The bug was introduced when reversing the direction of edge arrow,
unfortunatley the "node <- node" syntax overlaps with the html label
syntax.
This commit is contained in:
Guillaume Bury 2017-07-24 17:04:12 +02:00
parent 0c99e6b2e7
commit daa30a2b4f
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/backend/dot.ml
View file

@ -71,7 +71,7 @@ module Make(S : Res.S)(A : Arg with type atom := S.atom
done done
let print_edge fmt i j = let print_edge fmt i j =
Format.fprintf fmt "%s <- %s;@\n" i j Format.fprintf fmt "%s -> %s;@\n" j i
let print_edges fmt n = let print_edges fmt n =
match S.(n.step) with match S.(n.step) with