1. Bryan O'Sullivan
  2. aeson

Commits

Bryan O'Sullivan  committed 0ec6030

Fix thinko

  • Participants
  • Parent commits 15af734
  • Branches default

Comments (0)

Files changed (1)

File Data/Aeson/Encode.hs

View file
  • Ignore whitespace
 fromNumber :: Number -> Builder
 fromNumber (I i) = integral i
 fromNumber (D d)
-    | isNaN d || isInfinite d = "null"
+    | isNaN d || isInfinite d = fromByteString "null"
     | otherwise               = double d
 
 -- | Efficiently serialize a JSON value as a lazy 'L.ByteString'.