std/json

Json = Null | Boolean | Integer | Number | Text | Array | Object

JsonError = (offset = Int, reason = String)

parse = (text : String) -> Result(Json, JsonError) {

print = (json : Json) -> String { render(json, "", 0, False) }

pretty = (json : Json, indent : Int) -> String {

field = (json : Json, key : String) -> Option(Json) {

index = (json : Json, at : Int) -> Option(Json) {

as_bool = (json : Json) -> Option(Bool) {

as_int = (json : Json) -> Option(Int) {

as_float = (json : Json) -> Option(Float) {

as_string = (json : Json) -> Option(String) {

as_array = (json : Json) -> Option(List(Json)) {

as_object = (json : Json) -> Option(List((String, Json))) {