missing tawny-name annotation

[jaydchan]

Test to ensure that all classes - including those not pre-defined (i.e. j2) have a tawny-name annotation.

(deftest tawny-name [](let [j1 %28o/owl-class to) j2 (first (o/superclasses to j1))] (is (not (empty? (.getAnnotations j1 to)))) (is (not (empty? (.getAnnotations j2 to))))))

[phillord]

The test case doesn't actually work am afraid. Can you provide a complete test case.

[jaydchan]

My understanding of tawny-name annotations is:

Due to the design of Tawny-OWL, only entities that are explicitly defined are given a tawny-name annotation.

As A and C classes are explicity defined using defclass and owl-class functions, A and C have tawny-name annotations.

However B and D classes are entities that were created by 'side-effect', therefore they do not have tawny-name annotations.

The corrected (and complete) test is:

(deftest tawny-name
  (o/defontology ont
    :iri "http://test")
  (o/defclass A :super "B")
  (let [B (first (o/superclasses ont A))
        C (o/owl-class "C" :super "D")
        D (first (o/superclasses ont C))]
    (is
     (= tawny.tawny/name
        (.getProperty
         (first
          (.getAnnotations A ont)))))
    (is
     (empty?
      (.getAnnotations B ont)))
    (is
     (= tawny.tawny/name
        (.getProperty
         (first
          (.getAnnotations C ont)))))
    (is
     (empty?
      (.getAnnotations D ont)))))

Thus this 'issue' is not actually an issue, and should be closed.