Blame Data/Aeson/Compat.hs
|
Packit |
9a2dfb |
{-# LANGUAGE CPP #-}
|
|
Packit |
9a2dfb |
|
|
Packit |
9a2dfb |
module Data.Aeson.Compat
|
|
Packit |
9a2dfb |
(
|
|
Packit |
9a2dfb |
fromStrict
|
|
Packit |
9a2dfb |
) where
|
|
Packit |
9a2dfb |
|
|
Packit |
9a2dfb |
import qualified Data.ByteString as S
|
|
Packit |
9a2dfb |
import qualified Data.ByteString.Lazy as L
|
|
Packit |
9a2dfb |
|
|
Packit |
9a2dfb |
fromStrict :: S.ByteString -> L.ByteString
|
|
Packit |
9a2dfb |
#if MIN_VERSION_bytestring(0, 9, 2)
|
|
Packit |
9a2dfb |
fromStrict = L.fromChunks . (:[])
|
|
Packit |
9a2dfb |
#else
|
|
Packit |
9a2dfb |
fromStrict = L.fromStrict
|
|
Packit |
9a2dfb |
#endif
|