优化关键字函数

Question

关键字函数可以被加速。当动态创建关键字进行 XHR 时，这很重要。

当前的补丁现在与 Clojure 更紧密地匹配（使用子串）。它也针对传递字符串进行了优化。

结果

`
(enable-console-print!)
(let [sims 1000000]
(dotimes [_ 2]

(doseq [x ["foo" "foo/bar" [nil "foo"] ["foo" "bar"] [:foo :bar] [nil :foo]]]
  (prn "Testing keyword with: " x)
  (if (vector? x)
    (do (simple-benchmark [[a0 a1] x] (set! js/FOOO (keyword a0 a1)) sims)
        (simple-benchmark [[a0 a1] x] (set! js/FOOO (keyword2 a0 a1)) sims))
    (do (simple-benchmark [] (set! js/FOOO (keyword x)) sims)
        (simple-benchmark [] (set! js/FOOO (keyword2 x)) sims))))))

"测试关键字：" "foo"
[], (set! js/FOOO (keyword x)), 1000000 次运行，194 毫秒
[], (set! js/FOOO (keyword2 x)), 1000000 次运行，71 毫秒
"测试关键字：" "foo/bar"
[], (set! js/FOOO (keyword x)), 1000000 次运行，260 毫秒
[], (set! js/FOOO (keyword2 x)), 1000000 次运行，104 毫秒
"测试关键字：" [nil "foo"] [[a0 a1] x], (set! js/FOOO (keyword a0 a1)), 1000000 次运行，278 毫秒
[[a0 a1] x], (set! js/FOOO (keyword2 a0 a1)), 1000000 次运行，188 毫秒
"测试关键字：" ["foo" "bar"] [[a0 a1] x], (set! js/FOOO (keyword a0 a1)), 1000000 次运行，379 毫秒
[[a0 a1] x], (set! js/FOOO (keyword2 a0 a1)), 1000000 次运行，215 毫秒
"测试关键字：" [:foo :bar] [[a0 a1] x], (set! js/FOOO (keyword a0 a1)), 1000000 次运行，351 毫秒
[[a0 a1] x], (set! js/FOOO (keyword2 a0 a1)), 1000000 次运行，207 毫秒
"测试关键字：" [nil :foo] [[a0 a1] x], (set! js/FOOO (keyword a0 a1)), 1000000 次运行，376 毫秒
[[a0 a1] x], (set! js/FOOO (keyword2 a0 a1)), 1000000 次运行，37 毫秒
`

Answer 1

评论由：aralo 提出

更改了以下操作的行为

((juxt namespace name) (keyword "foo/bar/hmm")) => [nil "foo"] (.-fqn (keyword "foo/bar/hmm")) => "foo/bar/hmm" ((juxt namespace name) (keyword2 "foo/bar/hmm")) => ["foo" "bar/hmm"] (.-fqn (keyword2 "foo/bar/hmm")) => "foo/bar/hmm"

Clojure 1.9

((juxt namespace name) (keyword "foo/bar/hmm")) => ["foo" "bar/hmm"]

所以：耶

Answer 2

评论者：mfikes

CLJS-2120.patch 已添加到补丁提案(i)

Answer 3

评论者：mfikes

CLJS-2120.patch 通过CI和Canary(/)

Answer 4

参考： https://clojure.atlassian.net/browse/CLJS-2120 （由aralo报告）