Module MyARG.Stack

Parameters

module Arg : S with module Edge = InlineEdge

Signature

module Node = StackNode(Arg.Node)
module Edge = Arg.Edge
val main_entry : Node.t
val next : Node.t -> (Edge.t * Node.t) list