Module Pa_gt.Core2

val oops : Ploc.t -> string -> 'a
val get_val : 'a -> 'b Ploc.vala -> 'b
val generate_str : bool -> (MLast.type_decl * Base.string list) list -> Pa_gt.Camlp5Helpers.loc -> MLast.str_item
val generate_sig : bool -> (MLast.type_decl * Base.string list) list -> Pa_gt.Camlp5Helpers.loc -> MLast.sig_item