src/Stores/JSON.shp

module: Store;

type t = {
  document: Bytes;
}

let createcreate: pure fn!(value: String) -> $project.6578616d706c65732f626f6f6b2f73746f72652d6d6f64756c6573.Stores.JSON = (valuevalue: String) =>
  { document = must Json.encodeencode: pure fn('a: Encode)(value: String) -> Bytes, exn [ :encode(Wire.EncodeError) ](valuevalue: String); };

let readread: pure fn!(store: $project.6578616d706c65732f626f6f6b2f73746f72652d6d6f64756c6573.Stores.JSON) -> String = (storestore: $project.6578616d706c65732f626f6f6b2f73746f72652d6d6f64756c6573.Stores.JSON) => must Json.decodedecode: pure fn('target: Decode)(body: Bytes, target: Struct(String), ~max_depth: Int = 128) -> String, exn [ :decode(Wire.DecodeError) ](storestore: $project.6578616d706c65732f626f6f6b2f73746f72652d6d6f64756c6573.Stores.JSON.documentdocument: Bytes, String);