sig
  type t =
    Migrate_parsetree.Ast_411.Parsetree.constant =
      Pconst_integer of string * char option
    | Pconst_char of char
    | Pconst_string of string * Migrate_parsetree.Ast_411.Location.t *
        string option
    | Pconst_float of string * char option
  val of_constant :
    Migrate_parsetree.Ast_411.Parsetree.constant ->
    Ast_convenience_411.Constant.t
  val to_constant :
    Ast_convenience_411.Constant.t ->
    Migrate_parsetree.Ast_411.Parsetree.constant
end