rhi/bytebuild
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

unroll loop in the implementation of word8Dec

Browse source
This commit is contained in:
Andrew Martin 2019-09-05 09:02:50 -04:00
parent 26421ff05b
commit 61871a9ae3
2 changed files with 21 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test/Main.hs
View file

@ -53,6 +53,10 @@ tests = testGroup "Tests"
run 1 (word64PaddedUpperHex w)
===
pack (showWord64PaddedUpperHex w)
, TQC.testProperty "word8Dec" $ \w ->
run 1 (word8Dec w)
===
pack (show w)
, TQC.testProperty "pasteArrayST" $ \(xs :: [Word64]) ->
(runArray word64Dec (V.fromList xs))
===