439f13f · typeable/aeson

git.iko.soy/typeable/aeson

Use scientific >= 0.3

scientific-0.3 exports the Text and ByteString Scientific Builders from the following modules respectively: - Data.Text.Lazy.Builder.Scientific - Data.ByteString.Builder.Scientific

commit439f13fabfa9db5f8b7d214f3507994cfe6f14a3 authorBas van Dijk <v.dijk.bas@gmail.com> dateMon 12 May 2014, 10:35 (12 years ago) parent4e22895

3 files changed+6−4

compare with master

unifiedsplit

Data/Aeson/Encode.hs+2−1 Data/Aeson/Encode/ByteString.hs+3−2 aeson.cabal+1−1

Data/Aeson/Encode.hs+2−1

@@ -34,9 +34,10 @@ module Data.Aeson.Encode

3434

3535import Data.Aeson.Types (Value(..))

3636import Data.Monoid (mappend)

37−import Data.Scientific (Scientific, coefficient, base10Exponent, scientificBuilder)

37+import Data.Scientific (Scientific, coefficient, base10Exponent)

3838import Data.Text.Lazy.Builder

3939import Data.Text.Lazy.Builder.Int (decimal)

40+import Data.Text.Lazy.Builder.Scientific (scientificBuilder)

4041import Numeric (showHex)

4142import qualified Data.HashMap.Strict as H

4243import qualified Data.Text as T

Data/Aeson/Encode/ByteString.hs+3−2

@@ -19,11 +19,12 @@ module Data.Aeson.Encode.ByteString

1919import Prelude hiding (null)

2020import Data.Aeson.Types (ToJSON(..), Value(..))

2121import Data.Char (ord)

22−import Data.Scientific (Scientific, coefficient, base10Exponent, formatScientific, FPFormat(Generic))

22+import Data.Scientific (Scientific, coefficient, base10Exponent)

2323import Data.Word (Word8)

2424import Data.Monoid (mappend)

2525import Data.ByteString.Builder as B

2626import Data.ByteString.Builder.Prim as BP

27+import Data.ByteString.Builder.Scientific (scientificBuilder)

2728import qualified Data.ByteString.Lazy as L

2829import qualified Data.HashMap.Strict as HMS

2930import qualified Data.Text as T

@@ -95,7 +96,7 @@ string t =

9596

9697number :: Scientific -> Builder

9798number s

98− | e < 0 = B.string8 $ formatScientific Generic Nothing s

99+ | e < 0 = scientificBuilder s

99100 | otherwise = B.integerDec (coefficient s * 10 ^ e)

100101 where

101102 e = base10Exponent s

aeson.cabal+1−1

@@ -125,7 +125,7 @@ library

125125 time,

126126 unordered-containers >= 0.2.3.0,

127127 vector >= 0.7.1,

128− scientific >= 0.2

128+ scientific >= 0.3

129129

130130 if flag(blaze-builder)

131131 build-depends: blaze-builder >= 0.2.1.4