bsless/baseline.svg Secret

## baseline.svg

      
Display the source blob

    
Display the rendered blob

    
    Raw
  

              baseline.svg
            
          
      Loading

      Sorry, something went wrong. Reload?
      Sorry, we cannot display this file.
      Sorry, this file is invalid so it cannot be displayed.
      
          Viewer requires iframe.
      
    
## sieppari-bench.clj
(require '[sieppari.queue :as q])
(require '[sieppari.core :as s])
(require '[clj-async-profiler.core :as prof])
(require '[criterium.core :as cc])

(def +items+ 10)
(def interceptors (conj (mapv (fn [value] {:enter identity}) (range +items+)) identity))
(def queue (q/into-queue interceptors))
(def map-request {})
(defrecord RequestOrContext [values queue stack])
(def record-request (map->RequestOrContext map-request))
(def app (fn [req] (s/execute queue req)))
(app record-request)
(cc/quick-bench (app record-request))
;; (prof/clear-results)
(prof/serve-files 7777)
(prof/profile
 (time (dotimes [_ 1e7] (app record-request))))
	(require '[sieppari.queue :as q])
	(require '[sieppari.core :as s])
	(require '[clj-async-profiler.core :as prof])
	(require '[criterium.core :as cc])

	(def +items+ 10)
	(def interceptors (conj (mapv (fn [value] {:enter identity}) (range +items+)) identity))
	(def queue (q/into-queue interceptors))
	(def map-request {})
	(defrecord RequestOrContext [values queue stack])
	(def record-request (map->RequestOrContext map-request))
	(def app (fn [req] (s/execute queue req)))
	(app record-request)
	(cc/quick-bench (app record-request))
	;; (prof/clear-results)
	(prof/serve-files 7777)
	(prof/profile
	(time (dotimes [_ 1e7] (app record-request))))