walpurgis/graphviz/functions/gen_subroutine.dot

digraph fn_gen_function {
  labelloc="t";
  graph [fontname = "cc wild words"];
  node [fontname = "cc wild words"];
  edge [fontname = "cc wild words"];

  label="fn_gen_subroutine(SubRoutine)";
  fontname=lovebeat;
  rankdir=TB;
  newrank=true;

  a [label="push args into scope"];
  b [label="new scope"];
  c [label="gen_statement()" shape=diamond style=filled
  fillcolor=lightsalmon];
  d [label="fork on return"];
  e [label="gen_return(GazType)" shape=diamond style=filled
  fillcolor=lightsalmon];
  f [label="return" style=filled fillcolor=lightskyblue1];

  a -> b -> c -> d;
  c -> c [dir=back];
  d -> e -> f;
  d -> f;
}