fix: restore CCSexp.atom which was lost in 2.7

This commit is contained in:
Simon Cruanes 2019-11-13 15:30:11 -06:00
parent 7bdf6f6cef
commit 968a39b6bc
2 changed files with 5 additions and 2 deletions

View file

@ -1,4 +1,3 @@
(* This file is free software, part of containers. See file "license" for more details. *)
(** {1 Simple S-expression parsing/printing} *)
@ -365,3 +364,5 @@ include (Make(struct
(*$Q & ~count:100
sexp_gen (fun s -> sexp_valid s ==> (to_string s |> parse_string = Result.Ok s))
*)
let atom s : t = `Atom s

View file

@ -1,4 +1,3 @@
(* This file is free software, part of containers. See file "license" for more details. *)
(** {1 Handling S-expressions} *)
@ -34,3 +33,6 @@ type t = [
]
include S with type t := t
val atom : string -> t
(** Build an atom directly from a string. *)