aboutsummaryrefslogtreecommitdiff
path: root/test/turtle/main.ml
diff options
context:
space:
mode:
authorarie <arie@alleycat.cc>2021-06-14 18:25:26 +0200
committerarie <arie@alleycat.cc>2021-06-28 21:03:35 +0200
commit4e6349d102a99011ff3ee45f168247ae6d16bc5d (patch)
tree7632ddb8e31146f76166469c6088901f02df787b /test/turtle/main.ml
parent862a3d9eb439452f8903384da421d543064168cc (diff)
Rdf turtle
Add turtle -> graph transformation. Well, statement to graph to be precise, but that's only a list.fold away. Add a function in bin for testing. It does things, but now the great debugging can start, because some of these things are unexpected.
Diffstat (limited to 'test/turtle/main.ml')
-rw-r--r--test/turtle/main.ml5
1 files changed, 3 insertions, 2 deletions
diff --git a/test/turtle/main.ml b/test/turtle/main.ml
index 0973a17..6cd5c32 100644
--- a/test/turtle/main.ml
+++ b/test/turtle/main.ml
@@ -163,7 +163,7 @@ let object_test_case =
) ;
(* BNodePlist *)
"[ foaf:name \"Bob\" ]",
- Obj_BnodPs (BnodPs ([ Predicate.of_iri @@ Iri.of_prefixed_name @@ Prefixed_name.of_strings "foaf" "name",
+ Obj_bnodps (BnodPs ([ Predicate.of_iri @@ Iri.of_prefixed_name @@ Prefixed_name.of_strings "foaf" "name",
[ Obj_literal ( Literal.make
("Bob")
(Iri.of_prefixed_name @@ Prefixed_name.of_strings "xsd" "string"))
@@ -265,7 +265,7 @@ let subject_test_case =
Literal.make
("1")
(Iri.of_prefixed_name @@ Prefixed_name.of_strings "xsd" "string")) ;
- Obj_BnodPs (
+ Obj_bnodps (
BnodPs (
[ Predicate.of_iri @@ Iri.of_prefixed_name @@ Prefixed_name.of_strings "" "p",
[ Obj_iri (Iri.of_prefixed_name @@ Prefixed_name.of_strings "" "q"); ] ; ]
@@ -302,6 +302,7 @@ let triples_test_case =
([ Predicate.of_iri @@ Iri.of_iriref "http://www.perceive.net/schemas/relationship/enemyOf",
[ Obj_iri (Iri.of_iriref "http://example.org/#green-goblin"); ] ; ])
;
+(* TODO write test with proper predobjs *)
"[ foaf:name \"Bob\" ]",
Triples.of_bnodps (
BnodPs ([ Predicate.of_iri @@ Iri.of_prefixed_name @@ Prefixed_name.of_strings "foaf" "name",