streams 3.1 → 3.1.1
raw patch · 8 files changed
+28/−5 lines, 8 files
Files
- CHANGELOG.markdown +4/−0
- src/Data/Stream/Future.hs +4/−0
- src/Data/Stream/Future/Skew.hs +4/−0
- src/Data/Stream/Infinite.hs +4/−0
- src/Data/Stream/Infinite/Functional/Zipper.hs +3/−3
- src/Data/Stream/Infinite/Skew.hs +4/−0
- src/Data/Stream/Supply.hs +4/−1
- streams.cabal +1/−1
CHANGELOG.markdown view
@@ -1,3 +1,7 @@+3.1.1+-----+* Marked modules appropriately Trustworthy+ 3.0.1 ----- * Removed intra-package dependency bounds for my packages
src/Data/Stream/Future.hs view
@@ -1,4 +1,8 @@ {-# LANGUAGE BangPatterns #-}+{-# LANGUAGE CPP #-}+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+{-# LANGUAGE Trustworthy #-}+#endif ----------------------------------------------------------------------------- -- | -- Module : Data.Stream.Future
src/Data/Stream/Future/Skew.hs view
@@ -1,4 +1,8 @@ {-# LANGUAGE PatternGuards, BangPatterns #-}+{-# LANGUAGE CPP #-}+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+{-# LANGUAGE Trustworthy #-}+#endif ----------------------------------------------------------------------------- -- | -- Module : Data.Stream.Future.Skew
src/Data/Stream/Infinite.hs view
@@ -1,4 +1,8 @@ {-# LANGUAGE PatternGuards #-}+{-# LANGUAGE CPP #-}+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+{-# LANGUAGE Trustworthy #-}+#endif ----------------------------------------------------------------------------- -- | -- Module : Data.Stream.Infinite
src/Data/Stream/Infinite/Functional/Zipper.hs view
@@ -1,4 +1,7 @@ {-# LANGUAGE CPP, PatternGuards, BangPatterns #-}+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+{-# LANGUAGE Trustworthy #-}+#endif ----------------------------------------------------------------------------- -- | -- Module : Data.Zipper.Infinite.Functional.Zipper@@ -217,9 +220,6 @@ -- | @xs !! n@ returns the element of the stream @xs@ at index -- @n@. Note that the head of the stream has index 0.------ /Beware/: passing a negative integer as the first argument will cause--- an error. (!!) :: Zipper a -> Integer -> a (!!) (n :~ f) m = f (n + m)
src/Data/Stream/Infinite/Skew.hs view
@@ -1,4 +1,8 @@ {-# LANGUAGE PatternGuards, BangPatterns #-}+{-# LANGUAGE CPP #-}+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+{-# LANGUAGE Trustworthy #-}+#endif ----------------------------------------------------------------------------- -- | -- Module : Data.Stream.Infinite.Skew
src/Data/Stream/Supply.hs view
@@ -1,4 +1,7 @@ {-# LANGUAGE CPP, FlexibleContexts #-}+#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ >= 702+{-# LANGUAGE Trustworthy #-}+#endif ----------------------------------------------------------------------------- -- | -- Module : Data.Stream.Supply@@ -57,7 +60,7 @@ import Data.Data #endif -#ifdef __GLASGOW_HASKELL__ >= 608 +#if __GLASGOW_HASKELL__ >= 608 import GHC.IO(unsafeDupableInterleaveIO) #else unsafeDupableInterleaveIO :: IO a -> IO a
streams.cabal view
@@ -1,6 +1,6 @@ name: streams category: Control, Comonads-version: 3.1+version: 3.1.1 license: BSD3 cabal-version: >= 1.6 license-file: LICENSE