fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

refactor: hlint

Browse Source
This commit is contained in:
Gregor Kleen 2020-09-21 12:24:31 +02:00
parent 4801d22cb3
commit 8afacdd6b7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/Utils/Metrics.hs
View File

@ -128,14 +128,14 @@ jobHeldLocksCount heldLocks = Metric $ return (MkJobHeldLocksCount, collectJobHe
{-# NOINLINE sourcedFileChunkSizes #-} {-# NOINLINE sourcedFileChunkSizes #-}
sourcedFileChunkSizes :: Vector Label1 Histogram sourcedFileChunkSizes :: Vector Label1 Histogram
sourcedFileChunkSizes = unsafeRegister . vector ("storage") $ histogram info buckets sourcedFileChunkSizes = unsafeRegister . vector "storage" $ histogram info buckets
where info = Info "uni2work_sourced_file_chunks_bytes" where info = Info "uni2work_sourced_file_chunks_bytes"
"Sizes of files chunks sourced" "Sizes of files chunks sourced"
buckets = 0 : histogramBuckets 1 20000000 buckets = 0 : histogramBuckets 1 20000000
{-# NOINLINE sunkFileChunkSizes #-} {-# NOINLINE sunkFileChunkSizes #-}
sunkFileChunkSizes :: Vector Label1 Histogram sunkFileChunkSizes :: Vector Label1 Histogram
sunkFileChunkSizes = unsafeRegister . vector ("storage") $ histogram info buckets sunkFileChunkSizes = unsafeRegister . vector "storage" $ histogram info buckets
where info = Info "uni2work_sunk_file_chunks_bytes" where info = Info "uni2work_sunk_file_chunks_bytes"
"Sizes of files chunks sunk" "Sizes of files chunks sunk"
buckets = 0 : histogramBuckets 1 100000000 buckets = 0 : histogramBuckets 1 100000000