# Module Defs.Generator.AstHelpers

    module AstHelpers: Defs.AstHelpers

    module Untranslate: Type.Untranslate

    val seq : Camlp4.PreCast.Ast.expr -> Camlp4.PreCast.Ast.expr -> Camlp4.PreCast.Ast.expr

    val seq_list : Camlp4.PreCast.Ast.expr list -> Camlp4.PreCast.Ast.expr

    val record_pattern : ?prefix:string -> Type.field list -> Camlp4.PreCast.Ast.patt

    val record_expr : (string * Camlp4.PreCast.Ast.expr) list -> Camlp4.PreCast.Ast.expr

    val record_expression : ?prefix:string -> Type.field list -> Camlp4.PreCast.Ast.expr

    val expr_list : Camlp4.PreCast.Ast.expr list -> Camlp4.PreCast.Ast.expr

    val patt_list : Camlp4.PreCast.Ast.patt list -> Camlp4.PreCast.Ast.patt

    val tuple_expr : Camlp4.PreCast.Ast.expr list -> Camlp4.PreCast.Ast.expr

    val tuple : ?param:string ->
           int -> string list * Camlp4.PreCast.Ast.patt * Camlp4.PreCast.Ast.expr

    val cast_pattern : Type.qname Type.NameMap.t ->
           ?param:string ->
           Type.expr ->
           Camlp4.PreCast.Ast.patt * Camlp4.PreCast.Ast.expr * Camlp4.PreCast.Ast.expr

    val modname_from_qname : qname:string list -> classname:string -> Camlp4.PreCast.Ast.ident