Te (melange.Melange_compiler_libs.Ast

val mk : 
  ?loc:loc ->
  ?attrs:attrs ->
  ?docs:Docstrings.docs ->
  ?params:
    (Parsetree.core_type * (Asttypes.variance * Asttypes.injectivity)) list ->
  ?priv:Asttypes.private_flag ->
  lid ->
  Parsetree.extension_constructor list ->
  Parsetree.type_extension

val mk_exception : 
  ?loc:loc ->
  ?attrs:attrs ->
  ?docs:Docstrings.docs ->
  Parsetree.extension_constructor ->
  Parsetree.type_exception

val constructor : 
  ?loc:loc ->
  ?attrs:attrs ->
  ?docs:Docstrings.docs ->
  ?info:Docstrings.info ->
  str ->
  Parsetree.extension_constructor_kind ->
  Parsetree.extension_constructor

val decl : 
  ?loc:loc ->
  ?attrs:attrs ->
  ?docs:Docstrings.docs ->
  ?info:Docstrings.info ->
  ?vars:str list ->
  ?args:Parsetree.constructor_arguments ->
  ?res:Parsetree.core_type ->
  str ->
  Parsetree.extension_constructor

val rebind : 
  ?loc:loc ->
  ?attrs:attrs ->
  ?docs:Docstrings.docs ->
  ?info:Docstrings.info ->
  str ->
  lid ->
  Parsetree.extension_constructor