(* Liveness analysis.
Annotate mach code with the set of regs live at each point. *)
val fundecl: Mach.fundecl -> unit