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 =
| Program of program
| Info of tok
val str_of_name : ('a * 'b) -> 'a
val info_of_name : ('a * 'b) -> 'b