luciano/reitit
1
0
Fork 0
mirror of https://github.com/metosin/reitit.git synced 2025-12-23 18:41:11 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Cleanup & fix perf test

Browse source
This commit is contained in:
Tommi Reiman 2017-08-12 17:55:58 +03:00
parent 1835ffc681
commit 5f1d6a61a6
4 changed files with 4 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
perf-test/clj/reitit/perf_test.clj
View file

@ -93,7 +93,7 @@
;; 2.4µs (-84%) ;; 2.4µs (-84%)
(title "pedestal - map-tree => prefix-tree") (title "pedestal - map-tree => prefix-tree")
(let [call #(pedestal/find-route pedestal-routes {:path-info "/workspace/1/1" :request-method :get})] (let [call #(pedestal/find-route pedestal-router {:path-info "/workspace/1/1" :request-method :get})]
(assert (call)) (assert (call))
(cc/quick-bench (cc/quick-bench
(call))) (call)))

4
src/reitit/core.cljc
View file

@ -90,7 +90,7 @@
"Creates a [[LinearRouter]] from routes and optional options. "Creates a [[LinearRouter]] from routes and optional options.
See [[router]] for available options" See [[router]] for available options"
([routes] ([routes]
(linear-router routes {})) (linear-router routes {}))
([routes {:keys [compile]}] ([routes {:keys [compile]}]
(let [compiled (map (partial compile-route compile) routes)] (let [compiled (map (partial compile-route compile) routes)]
(->LinearRouter (->LinearRouter
@ -118,7 +118,7 @@
"Creates a [[LookupRouter]] from routes and optional options. "Creates a [[LookupRouter]] from routes and optional options.
See [[router]] for available options" See [[router]] for available options"
([routes] ([routes]
(lookup-router routes {})) (lookup-router routes {}))
([routes {:keys [compile]}] ([routes {:keys [compile]}]
(let [compiled (map (partial compile-route compile) routes)] (let [compiled (map (partial compile-route compile) routes)]
(when-let [route (some impl/contains-wilds? (map first routes))] (when-let [route (some impl/contains-wilds? (map first routes))]

2
src/reitit/impl.cljc
View file

@ -10,7 +10,7 @@
; ;
; You must not remove this notice, or any other, from this software. ; You must not remove this notice, or any other, from this software.
(ns reitit.impl (ns ^:no-doc reitit.impl
(:require [clojure.string :as str] (:require [clojure.string :as str]
[clojure.set :as set]) [clojure.set :as set])
(:import #?(:clj (java.util.regex Pattern)))) (:import #?(:clj (java.util.regex Pattern))))

1
test/cljc/reitit/core_test.cljc
View file

@ -119,4 +119,3 @@
:path "/api/user/1/2" :path "/api/user/1/2"
:params {:id "1", :sub-id "2"}}) :params {:id "1", :sub-id "2"}})
(reitit/match-by-path router "/api/user/1/2")))))) (reitit/match-by-path router "/api/user/1/2"))))))