Inconsistent tag behavior

[rublag]

When symbol a is tagged with symbol b which has any tags except zen/tag, or symbol a is tagged with symbol a, there is no error.

1. Error

   (do (require '[zen.core :as zen])
       (def ztx (zen/new-context))
       (def myns '{ns testns
   
                   testnottag
                   {:zen/tags #{zen/schema}}
   
                   testsym
                   {:zen/tags #{testnottag}
                   :a "b"}})
       (zen/load-ns ztx myns)
       (zen/errors ztx))

2. No error

   (do (require '[zen.core :as zen])
       (def ztx (zen/new-context))
       (def myns '{ns testns
                   testsym
                   {:zen/tags #{testsym}
                   :a "b"}})
       (zen/load-ns ztx myns)
       (zen/errors ztx))

3. No error

   (do (require '[zen.core :as zen])
       (def ztx (zen/new-context))
       (def myns '{ns testns
   
                   testnottag
                   {:a :b}
   
                   testsym
                   {:zen/tags #{testnottag}
                   :a "b"}})
       (zen/load-ns ztx myns)
       (zen/errors ztx))