🐛 Fix minor issue on executors monitor

This commit is contained in:
Andrey Antukh 2022-03-01 14:34:13 +01:00
parent 03a082fe40
commit d1c834e647
2 changed files with 1 additions and 2 deletions

View file

@ -79,9 +79,9 @@
(letfn [(log-stats [scheduler state]
(doseq [[key ^ForkJoinPool executor] executors]
(let [labels (into-array String [(name key)])
active (.getActiveThreadCount executor)
running (.getRunningThreadCount executor)
queued (.getQueuedSubmissionCount executor)
active (.getPoolSize executor)
steals (.getStealCount executor)
steals-increment (- steals (or (get-in @state [key :steals]) 0))
steals-increment (if (neg? steals-increment) 0 steals-increment)]