Skip to content

Commit

Permalink
sampling-profiler: minor cleanup
Browse files Browse the repository at this point in the history
  • Loading branch information
klauswuestefeld committed Nov 5, 2024
1 parent 834395d commit c385f4f
Showing 1 changed file with 0 additions and 6 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,7 @@

(defn- summarize-samples! [{:keys [duration-sec interval-ms]}]
(let [end-time (+ (System/currentTimeMillis) (* 1000 duration-sec))]
(println "before loop")
(loop []
(println "looping")
(Thread/sleep interval-ms)
(swap! summary summarize (Thread/getAllStackTraces))
(if (and @running
Expand All @@ -36,12 +34,8 @@
(throw (IllegalStateException. "Profiler was already running.")))
(reset! summary {:sample-count 0})
(reset! running true)
(println "before future")
(future
(println "in future")
(try
(println "before summarize")

(summarize-samples! options)
(catch Exception e
(.printStackTrace e)))))
Expand Down

0 comments on commit c385f4f

Please sign in to comment.