diff --git a/modules/reitit-core/src/reitit/trie.cljc b/modules/reitit-core/src/reitit/trie.cljc index acca35a7..d4a6c3b6 100644 --- a/modules/reitit-core/src/reitit/trie.cljc +++ b/modules/reitit-core/src/reitit/trie.cljc @@ -61,8 +61,8 @@ (case (get s to) \{ (let [to' (or (str/index-of s "}" to) (ex/fail! (str "Unclosed brackets: " (pr-str s))))] (if (= \* (get s (inc to))) - (recur (concat ss (-static from to) (-catch-all (inc to) to')) (inc to') (inc to')) - (recur (concat ss (-static from to) (-wild to to')) (inc to') (inc to')))) + (recur (concat ss (-static from to) (-catch-all (inc to) to')) (long (inc to')) (long (inc to'))) + (recur (concat ss (-static from to) (-wild to to')) (long (inc to')) (long (inc to'))))) \: (let [to' (or (str/index-of s "/" to) (count s))] (if (= 1 (- to' to)) (recur ss from (inc to))