let deserialize s = Json_io.json_of_string ~allow_comments:true s