mirrors/pgloader
1
0
Fork 0
mirror of https://github.com/dimitri/pgloader.git synced 2026-05-04 18:36:12 +02:00
Code Issues Projects Releases Wiki Activity

Some commands don't have a parallel state.

Browse Source
This commit is contained in:
Dimitri Fontaine 2013-11-07 15:30:30 +01:00
parent ca968e62e4
commit 914a901230
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/utils.lisp
View File

@ -272,12 +272,12 @@
;; BEFORE
(if before
(progn
(report-summary :state before :footer nil)
(format t pgloader.utils::*header-line*)
(report-summary :state state :header nil :footer nil))
;; no state before
(report-summary :state state :footer nil))
(progn
(report-summary :state before :footer nil)
(format t pgloader.utils::*header-line*)
(report-summary :state state :header nil :footer nil))
;; no state before
(report-summary :state state :footer nil))
(when (or finally parallel)
(format t pgloader.utils::*header-line*)
@ -293,8 +293,9 @@
;; if the parallel tasks took longer than the rest cumulated, the total
;; waiting time actually was parallel - before
(when (< (pgloader.utils::pgstate-secs state)
(pgloader.utils::pgstate-secs parallel))
(when (and parallel
(< (pgloader.utils::pgstate-secs state)
(pgloader.utils::pgstate-secs parallel)))
(setf (pgloader.utils::pgstate-secs state)
(- (pgloader.utils::pgstate-secs parallel)
(pgloader.utils::pgstate-secs before))))