diff --git a/src/test/clj/org/domaindrivenarchitecture/activity_pub_poc/parser_test.clj b/src/test/clj/org/domaindrivenarchitecture/activity_pub_poc/parser_test.clj index 4115819..8a6815f 100644 --- a/src/test/clj/org/domaindrivenarchitecture/activity_pub_poc/parser_test.clj +++ b/src/test/clj/org/domaindrivenarchitecture/activity_pub_poc/parser_test.clj @@ -1,38 +1,38 @@ -(ns org.domaindrivenarchitecture.activity-pub-poc.parser-test - (:require [clojure.test :refer :all] - [org.domaindrivenarchitecture.activity-pub-poc.parser :as sut])) +;(ns org.domaindrivenarchitecture.activity-pub-poc.parser-test +; (:require [clojure.test :refer :all] +; [org.domaindrivenarchitecture.activity-pub-poc.parser :as sut])) -(def processed (slurp "src/test/resources/deleted_comments_minimal.ttl")) -(def expected-definitions ["@prefix : " - "@prefix as: " - "@prefix owl: " - "@prefix rdf: " - "@prefix xml: " - "@prefix xsd: " - "@prefix rdfs: " - "@base " - " a owl:Ontology ;\n rdfs:comment \"Extended Activity Streams 2.0 Vocabulary\"@en ;\n rdfs:label \"Activity Streams 2.0\"@en ;\n owl:imports " - "rdf:langString a rdfs:Datatype " - "xsd:duration a rdfs:Datatype " - "as:actor a owl:ObjectProperty ;\n rdfs:label \"actor\"@en ;\n rdfs:domain as:Activity ;\n rdfs:comment \"Subproperty of as:attributedTo that identifies the primary actor\"@en ;\n rdfs:subPropertyOf as:attributedTo ;\n rdfs:range [\n a owl:Class ;\n owl:unionOf (as:Object as:Link)\n ] " - "as:attributedTo a owl:ObjectProperty ;\n rdfs:label \"attributedTo\"@en;\n rdfs:comment \"Identifies an entity to which an object is attributed\"@en;\n rdfs:range [\n a owl:Class ;\n owl:unionOf (as:Object as:Link)\n ] ;\n rdfs:domain [\n a owl:Class ;\n owl:unionOf (as:Object as:Link)\n ] ; "]) - -(deftest remove-comments-test - (is - (= processed - (sut/delete-comments-and-newlines "src/test/resources/minimal.ttl")))) - -((deftest find-definitions-test - (testing "Finding definitons" - (is (= expected-definitions - (sut/find-definitions processed)))))) - -;ToDo -; spec für eine property: as:name -; test für (defn get-spec-from-ttl ttl-file element-name [spezified predicates]) -> (str spec) - -; ToDo -; spec generator - -; das gleiche für as:actor \ No newline at end of file +;(def processed (slurp "src/test/resources/deleted_comments_minimal.ttl")) +;(def expected-definitions ["@prefix : " +; "@prefix as: " +; "@prefix owl: " +; "@prefix rdf: " +; "@prefix xml: " +; "@prefix xsd: " +; "@prefix rdfs: " +; "@base " +; " a owl:Ontology ;\n rdfs:comment \"Extended Activity Streams 2.0 Vocabulary\"@en ;\n rdfs:label \"Activity Streams 2.0\"@en ;\n owl:imports " +; "rdf:langString a rdfs:Datatype " +; "xsd:duration a rdfs:Datatype " +; "as:actor a owl:ObjectProperty ;\n rdfs:label \"actor\"@en ;\n rdfs:domain as:Activity ;\n rdfs:comment \"Subproperty of as:attributedTo that identifies the primary actor\"@en ;\n rdfs:subPropertyOf as:attributedTo ;\n rdfs:range [\n a owl:Class ;\n owl:unionOf (as:Object as:Link)\n ] " +; "as:attributedTo a owl:ObjectProperty ;\n rdfs:label \"attributedTo\"@en;\n rdfs:comment \"Identifies an entity to which an object is attributed\"@en;\n rdfs:range [\n a owl:Class ;\n owl:unionOf (as:Object as:Link)\n ] ;\n rdfs:domain [\n a owl:Class ;\n owl:unionOf (as:Object as:Link)\n ] ; "]) +; +;(deftest remove-comments-test +; (is +; (= processed +; (sut/delete-comments-and-newlines "src/test/resources/minimal.ttl")))) +; +;((deftest find-definitions-test +; (testing "Finding definitons" +; (is (= expected-definitions +; (sut/find-definitions processed)))))) +; +;;ToDo +;; spec für eine property: as:name +;; test für (defn get-spec-from-ttl ttl-file element-name [spezified predicates]) -> (str spec) +; +;; ToDo +;; spec generator +; +;; das gleiche für as:actor \ No newline at end of file