diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/json/main.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/json/main.ml b/test/json/main.ml index 8e116cd..2b2073d 100644 --- a/test/json/main.ml +++ b/test/json/main.ml @@ -17,7 +17,8 @@ let encode_decode_predicate = let encode_decode_object = QCheck.Test.make ~name:"decode encode object" Rdf_gen.object' - (fun object' -> Triple.Object.equal + (fun object' -> + Triple.Object.equal object' (object' |> Rdf_json.encode_object |> Rdf_json.decode_object)) |