Module Core_sexp

module Core_sexp: sig .. end

no_raise is the identity, but by using 'a no_raise in a sexpable type, the resulting use sexp_of_no_raise protects the conversion of 'a to a sexp so that if it fails, one gets a sexp with an error message about the failure, rather than an exception being raised.

WARNING: The resulting no_raise_of_sexp can still raise.

type t = Sexplib.Sexp.t =

`\|`	`Atom of string`
`\|`	`List of t list`

module O: sig .. end

include Comparable

include Stringable

include Sexp_intf.S

exception Of_sexp_error of exn * t

val of_int_style : [ `No_underscores | `Underscores ] Pervasives.ref

type 'a no_raise = 'a

WARNING: The resulting no_raise_of_sexp can still raise.

module Sexp_option: sig .. end

module Sexp_list: sig .. end

module Sexp_array: sig .. end

module Sexp_opaque: sig .. end

module Sexp_maybe: sig .. end

val t_of_sexp : Sexplib.Sexp.t -> t

val sexp_of_t : t -> Sexplib.Sexp.t

val bin_t : t Bin_prot.Type_class.t

val bin_read_t : t Bin_prot.Read.reader

val __bin_read_t__ : (int -> t) Bin_prot.Read.reader

val bin_reader_t : t Bin_prot.Type_class.reader

val bin_size_t : t Bin_prot.Size.sizer

val bin_write_t : t Bin_prot.Write.writer

val bin_writer_t : t Bin_prot.Type_class.writer

val no_raise_of_sexp : (Sexplib.Sexp.t -> 'a) -> Sexplib.Sexp.t -> 'a no_raise

WARNING: The resulting no_raise_of_sexp can still raise.

val sexp_of_no_raise : ('a -> Sexplib.Sexp.t) -> 'a no_raise -> Sexplib.Sexp.t

val bin_no_raise : 'a Bin_prot.Type_class.t -> 'a no_raise Bin_prot.Type_class.t

val bin_read_no_raise : 'a Bin_prot.Read.reader -> 'a no_raise Bin_prot.Read.reader

val __bin_read_no_raise__ : 'a Bin_prot.Read.reader ->
       (int -> 'a no_raise) Bin_prot.Read.reader

val bin_reader_no_raise : 'a Bin_prot.Type_class.reader ->
       'a no_raise Bin_prot.Type_class.reader

val bin_size_no_raise : 'a Bin_prot.Size.sizer -> 'a no_raise Bin_prot.Size.sizer

val bin_write_no_raise : 'a Bin_prot.Write.writer -> 'a no_raise Bin_prot.Write.writer

val bin_writer_no_raise : 'a Bin_prot.Type_class.writer ->
       'a no_raise Bin_prot.Type_class.writer