diff options
| author | Christopher Baines <mail@cbaines.net> | 2024-04-16 12:16:45 +0100 |
|---|---|---|
| committer | Christopher Baines <mail@cbaines.net> | 2024-04-16 12:16:45 +0100 |
| commit | bf972c9fb928950909dab78f8af94902fc39000a (patch) | |
| tree | 9906b768e1605cb1318c9d9cf244b1bc56a0dbd7 | |
| parent | f2f9b154adb8055110df6e98718e283157494226 (diff) | |
| download | nar-herder-bf972c9fb928950909dab78f8af94902fc39000a.tar nar-herder-bf972c9fb928950909dab78f8af94902fc39000a.tar.gz | |
Add some debugging output to the cached compression management fiber
| -rw-r--r-- | nar-herder/cached-compression.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/nar-herder/cached-compression.scm b/nar-herder/cached-compression.scm index 45511e3..8d01618 100644 --- a/nar-herder/cached-compression.scm +++ b/nar-herder/cached-compression.scm @@ -269,6 +269,14 @@ (current-directory-size (assq-ref cached-bytes-by-compression compression))) + + (unless current-directory-size + (log-msg 'ERROR "current-directory-size unset: " + current-directory-size)) + (unless nar-size + (log-msg 'ERROR "nar-size unset: " + nar-size)) + (if directory-max-size (< (+ current-directory-size ;; Assume the commpressed nar could be |