test json opa

json.opa

/*
Test Json in opa
@author Matthieu Guffroy
*/


int_json : RPC.Json.json = {Int = 2}
float_json : RPC.Json.json = {Float = 2.0}
string_json : RPC.Json.json = {String = "test"}
bool_json : RPC.Json.json = {Bool = true}
list_json : RPC.Json.json = {List = [int_json, float_json, string_json, bool_json]}
record_json : RPC.Json.json = {Record = [("int", int_json), ("float", float_json), ("list", list_json)]}

do jlog("test serialize")
do jlog(Json.serialize(record_json))
do jlog("")
do jlog("test serialize_to_js")
do jlog(Json.serialize_to_js(record_json))