exception Code of Source.region * string

val version : int32
val encode : Ast.module_ -> string
val encode_custom : Ast.name -> string -> string