Make test for keyword more robust

2022-04-11 13:08:40 -04:00 · 2022-04-11 13:08:40 -04:00 · ceb8a2aa63
commit ceb8a2aa63
parent 2f6e81edb1
1 changed files with 1 additions and 1 deletions
--- a/src/ludus/interpreter.clj
+++ b/src/ludus/interpreter.clj
@ -171,7 +171,7 @@

        (throw (ex-info "Match Error: No match found" {:fn-name (:name lfn)})))))

-     (= clojure.lang.Keyword (type lfn))
+     (keyword? lfn)
     (if (= 2 (count tuple))
      (let [target (second tuple) kw lfn]
        (if (::data/struct target)