blob: f92ef49555dd6f5941c6cce6f59403917d451a67 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
signature JSON = sig
datatype json =
Array of json list
| Null
| Float of real
| String of string
| Bool of bool
| Int of int
| Obj of (string * json) list
val parse: string -> json
val print: json -> string
end
|