Module Ast_skip

type tok = Parse_info.t
and 'a wrap = 'a * tok
type name = string wrap
and lname = name
and uname = name
type program = unit
type any =
  1. | Program of program
  2. | Info of tok
val str_of_name : ('a * 'b) -> 'a
val info_of_name : ('a * 'b) -> 'b