package timedesc

  1. Overview
  2. Docs
package timedesc
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file to_sexp_utils.ml

1
2
3
4
5
6
let sexp_of_int64 x = CCSexp.atom @@ Int64.to_string x

let sexp_of_int x = CCSexp.atom @@ string_of_int x

let wrap_to_sexp_into_to_sexp_string (f : 'a -> CCSexp.t) x =
  CCSexp.to_string (f x)