Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
17 lines (13 sloc) 260 Bytes
module Json = struct
type t =
| Null
| Array of t list
| Object of (string * t) list
| Float of float
| Int of int
| Bool of bool
| String of string
let to_string _ = "."
exception Error of string
end
type json t = (A.t)