Garmelon/mima-tools
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix formatting of numbers into blocks

Browse source
This commit is contained in:
Joscha 2019-11-19 16:03:36 +00:00
parent 75e102ed7d
commit ee7639c1c7
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Mima/Format/Common.hs
View file

@ -33,7 +33,7 @@ toHex :: (Integral a, Show a) => a -> T.Text
toHex a = T.pack $ showHex a "" toHex a = T.pack $ showHex a ""
chunkedBy :: T.Text -> Int -> T.Text -> T.Text chunkedBy :: T.Text -> Int -> T.Text -> T.Text
chunkedBy sep n = T.intercalate sep . T.chunksOf n chunkedBy sep n = T.reverse . T.intercalate sep . T.chunksOf n . T.reverse
chunkyBin :: T.Text -> T.Text chunkyBin :: T.Text -> T.Text
chunkyBin = chunkedBy " " 4 chunkyBin = chunkedBy " " 4