digraph {
    node [shape="point"]
    Phase [label="'cond'",shape="oval",color="blue"]
    Inst [label="If",shape="oval"]
    NewEvalStack [color="green"]
    StackPhase [label="'finish'",shape="oval",color="green"]
    NewPhase [label="'init'",shape="oval",color="green"]
    ReturnValue [label="True",shape="oval"]

    Root -> UserRoot [label="username"]
    UserRoot -> Frame [label="'frame'"]
    Frame -> NewPhase [label="'phase'",color="green",penwidth=4]
    Frame -> Phase [label="'phase'",color="blue",style="dashed"]
    Frame -> NewEvalStack [label="'evalstack'",color="green",penwidth=4]
    Frame -> OldEvalStack [label="'evalstack'",color="blue",style="dashed"]
    NewEvalStack -> OldEvalStack [label="'prev'",color="green",penwidth=4]
    Frame -> Inst [label="'IP'",color="blue",style="dashed"]
    Inst -> Block [label="'then'"]
    OldEvalStack -> Inst [label="'inst'",color="green",penwidth=4]
    OldEvalStack -> StackPhase [label="'phase'",color="green",penwidth=4]
    Frame -> Block [label="'IP'",color="green",penwidth=4]
    Frame -> ReturnValue [label="'returnvalue'"]
}
