air 2011.6.19 → 2011.7.25

raw patch · 4 files changed

+15/−1 lines, 4 files

Files

air.cabal +1/−1
changelog.md +4/−0
src/Air/Env.hs +1/−0
src/Air/Light.hs +9/−0

air.cabal view

@@ -1,5 +1,5 @@ Name:                 air-Version:              2011.6.19+Version:              2011.7.25 Build-type:           Simple Synopsis:             air Description:          An alternative Haskell Prelude library.

changelog.md view

@@ -0,0 +1,4 @@+2011.7.25+---------++* add bytestring conversion

src/Air/Env.hs view

@@ -13,5 +13,6 @@ import Prelude hiding ((.), (>), (<), (^), (/), (-), (+), length, drop, take, splitAt, replicate, (!!)) import Air.Data.Monoid ((+)) import Air.Data.Default (Default, def)+import Air.Data.Managed (Managed, initialize, destroy, with_managed_object) import Air.Control.Monad.ListBuilder import Air.Control.Monad.ObjectBuilder

src/Air/Light.hs view

@@ -21,7 +21,10 @@ import Control.Concurrent import System.Exit ( exitWith, ExitCode(ExitSuccess) ) +import qualified Data.ByteString.Lazy.Char8 as LazyByteString+import qualified Data.ByteString.Char8 as StrictByteString + -- base DSL {-# INLINE (.) #-} (.) :: a -> (a -> b) -> b@@ -347,3 +350,9 @@  io :: (MonadIO m) => IO a -> m a io = liftIO++l2s :: LazyByteString.ByteString -> StrictByteString.ByteString+l2s x = StrictByteString.concat - LazyByteString.toChunks x++s2l :: StrictByteString.ByteString -> LazyByteString.ByteString+s2l x = LazyByteString.fromChunks [x]