Skip to content

Commit 495f013

Browse files
xnukLysxia
authored andcommitted
Digits.hs: Use Data.ByteString.Char8.pack instead of OverloadedStrings
1 parent f8f747b commit 495f013

File tree

1 file changed

+7
-8
lines changed

1 file changed

+7
-8
lines changed

src/Data/Text/Internal/Builder/Int/Digits.hs

Lines changed: 7 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1,5 +1,3 @@
1-
{-# LANGUAGE OverloadedStrings #-}
2-
31
-- Module: Data.Text.Internal.Builder.Int.Digits
42
-- Copyright: (c) 2013 Bryan O'Sullivan
53
-- License: BSD-style
@@ -16,11 +14,12 @@
1614

1715
module Data.Text.Internal.Builder.Int.Digits (digits) where
1816

19-
import Data.ByteString.Char8 (ByteString)
17+
import Data.ByteString.Char8 (ByteString, pack)
2018

2119
digits :: ByteString
22-
digits = "0001020304050607080910111213141516171819\
23-
\2021222324252627282930313233343536373839\
24-
\4041424344454647484950515253545556575859\
25-
\6061626364656667686970717273747576777879\
26-
\8081828384858687888990919293949596979899"
20+
digits = pack
21+
"0001020304050607080910111213141516171819\
22+
\2021222324252627282930313233343536373839\
23+
\4041424344454647484950515253545556575859\
24+
\6061626364656667686970717273747576777879\
25+
\8081828384858687888990919293949596979899"

0 commit comments

Comments
 (0)