       (p/insert acc p d))
     nil routes))
 
-(def reitit-segment
-  (reduce
-    (fn [acc [p d]]
-      (segment/insert acc p d))
-    nil routes))
+(def matcher
+  (.matcher
+    ^Trie
+    (reduce
+      (fn [acc [p d]]
+        (segment/insert acc p d))
+      nil routes)))
 
 (defn bench! []
 

  (:require [clojure.test :refer :all]
            [io.pedestal.http.route.prefix-tree :as p]
            [reitit.segment :as segment]
            [criterium.core :as cc]))

;;
;; testing

  ;;  1.0µs (Match records)
  ;; 0.63µs (Single sweep path paraµs)
  ;; 0.51µs (Cleanup)
  ;; 0.33µs (Java)
  (cc/quick-bench
    (segment/lookup matcher "/v1/orgs/1/topics")))

(comment
  (bench!))
