Module Ast_convenience_402.Constant

module Constant: sig .. end

type t =

`\|`	`Pconst_integer of string * char option`
`\|`	`Pconst_char of char`
`\|`	`Pconst_string of string * string option`
`\|`	`Pconst_float of string * char option`

exception Unknown_literal of string * char

val of_constant : Migrate_parsetree.Ast_402.Asttypes.constant -> t

Converts Asttypes.constant to Constant.t

val to_constant : t -> Migrate_parsetree.Ast_402.Asttypes.constant

Converts Constant.t to Asttypes.constant. Raises Unknown_literal if conversion fails