Sign upLogin

joshbohde/hdr-histogram

View on GitHub
Star
src/Data/HdrHistogram/Config/Internal.hs

Summary

Maintainability
Test Coverage

Use <$>
Open

  arbitrary = do
    (Positive min') <- arbitrary
    (Large max') <- arbitrary `suchThat` ((> min') . getLarge)
    s <- arbitrary
    return $ config min' max' s
Severity: Minor
Found in src/Data/HdrHistogram/Config/Internal.hs by hlint

Found

do (Positive min') <- arbitrary
   (Large max') <- arbitrary `suchThat` ((> min') . getLarge)
   s <- arbitrary
   return $ config min' max' s

Perhaps

do (Positive min') <- arbitrary
   (Large max') <- arbitrary `suchThat` ((> min') . getLarge)
   config min' max' <$> arbitrary

There are no issues that match your filters.

Category
Status