Cljs 超时定时器的跳表存在一个明显的错误：一个没有 recur 的循环
{code:java}
(let [x (skip-list-node k v (make-array new-level))]
(loop [i 0]
(when (<= i level)
(let [links (.-forward (aget update i))]
(aset (.-forward x) i (aget links i))
(aset links i x)))))
这是从 `put` 函数中来的。这通常是一个严重的错误，但是索引 0 位置的链接只是一个简单的链表链接，并且它省略了跳表的“跳过”部分。一个简单的补丁可以使它从 when 表达式中递归回来。
然而，这对 ceilingEntry 函数有影响
{code:java}
(ceilingEntry [coll k]
(loop [x header level level]
(if-not (neg? level)
(let [nx (loop [x x]
(let [x' (when (< level (alength (.-forward x)))
(aget (.-forward x) level))]
(when-not (nil? x')
(if (>= (.-key x') k)
x'
(recur x')))))]
(if-not (nil? nx)
(recur nx (dec level))
(recur x (dec level))))
(when-not (identical? x header)
x))))
此函数允许“超出”你要搜索的键，可能找到“下一个”节点。在简单链表中，这是良好且定义明确的。然而，在跳表中，这允许根据跳表的“跳过”大小发生剧烈且非确定性的超范围。
需要修补以只在某底层链表中进行超范围，而不是在任何跳表链接中。
