Sign upLogin

joshbohde/hdr-histogram

View on GitHub
Star

Showing 2 of 2 total issues

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

Unused LANGUAGE pragma
Open

{-# LANGUAGE KindSignatures      #-}
Severity: Minor
Found in src/Data/HdrHistogram/Config.hs by hlint

Found

{-# LANGUAGE KindSignatures #-}

Perhaps

Applying this change:

  • Extension KindSignatures is implied by TypeFamilies
Severity
Category
Status
Source
Language