Module Ast_convenience_402.Constant

module Constant: sig .. end

Provides abstraction over Asttypes.constant type

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 : Ast_402.Asttypes.constant -> t

Converts Asttypes.constant to Constant.t

val to_constant : t -> Ast_402.Asttypes.constant

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