tensort 0.2.0.1 → 0.2.0.2
raw patch · 4 files changed
+10/−6 lines, 4 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- CHANGELOG.md +4/−0
- tensort.cabal +1/−1
- test/SortSpec.hs +4/−4
- test/TestCheck.hs +1/−1
CHANGELOG.md view
@@ -33,3 +33,7 @@ * Improve documentation * Add very basic benchmarking++## 0.2.0.2 -- 2024-06-13++* Cleanup testing and CI
tensort.cabal view
@@ -20,7 +20,7 @@ -- PVP summary: +-+------- breaking API changes -- | | +----- non-breaking API additions -- | | | +--- code changes with no API change-version: 0.2.0.1+version: 0.2.0.2 tested-with: GHC==9.8.2, GHC==9.6.4,
test/SortSpec.hs view
@@ -14,7 +14,7 @@ result_is_sorted_bits :: ([Bit] -> [Bit]) -> [Bit] -> Property result_is_sorted_bits sort unsortedList = within- 100000+ 1000000 ( (length unsortedList < 10) ==> isSorted (SortBit (sort unsortedList)) )@@ -22,7 +22,7 @@ result_is_sorted_records :: SortAlg -> [Record] -> Property result_is_sorted_records sort unsortedList = within- 100000+ 1000000 ( (length unsortedList < 10) ==> isSorted (sort (SortRec unsortedList)) )@@ -30,7 +30,7 @@ result_is_sorted_records_short :: SortAlg -> [Record] -> Property result_is_sorted_records_short sort unsortedList = within- 100000+ 1000000 ( (length unsortedList < 6) ==> isSorted (sort (SortRec unsortedList)) )@@ -38,7 +38,7 @@ result_is_sorted_custom_bitsize :: Int -> [Bit] -> Property result_is_sorted_custom_bitsize n unsortedList = within- 100000+ 1000000 ( (length unsortedList < 15) && (n > 1) ==> isSorted (SortBit (tensortBN n unsortedList)) )
test/TestCheck.hs view
@@ -17,7 +17,7 @@ -- ...exit with failure check :: (Testable prop) => prop -> IO () check prop = do- result <- quickCheckResult prop+ result <- quickCheckResult (withDiscardRatio 2000 prop) unless (isPass result) exitFailure -- | Returns True if a test passes, and False otherwise