Json (swhid.Swhid.Json)

type json =

| Unit

| Bool of bool

| Float of float

| String of string

| Array of json list

| Object of (string * json) list

exception Escape of (int * int) * (int * int) * Jsonm.error

val json_of_src : 
  ?encoding:[< Jsonm.encoding ] ->
  [ `Channel of Stdlib.in_channel | `String of string ] ->
  ( json, ((int * int) * (int * int)) * Jsonm.error ) Stdlib.result

exception Found of json

val find : string -> json -> json option

val find_string : string -> json -> string option

val find_obj : string -> json -> (string * json) list option