haskell98 2.0.0.2 → 2.0.0.3

raw patch · 34 files changed

+167/−95 lines, 34 filesdep ~arraydep ~basedep ~directorynew-uploaderPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: array, base, directory, old-time, process, time

API changes (from Hackage documentation)

- Complex: (:+) :: !a -> !a -> Complex a

+ Complex: (:+) :: SrictNotUnpackeda -> SrictNotUnpackeda -> Complex a

- List: foldl :: (a -> b -> a) -> a -> [b] -> a

+ List: foldl :: (b -> a -> b) -> b -> [a] -> b

- List: genericIndex :: Integral a => [b] -> a -> b

+ List: genericIndex :: Integral i => [a] -> i -> a

- List: genericLength :: Num i => [b] -> i

+ List: genericLength :: Num i => [a] -> i

- List: genericSplitAt :: Integral i => i -> [b] -> ([b], [b])

+ List: genericSplitAt :: Integral i => i -> [a] -> ([a], [a])

- List: scanl :: (a -> b -> a) -> a -> [b] -> [a]

+ List: scanl :: (b -> a -> b) -> b -> [a] -> [b]

- Prelude: foldl :: (a -> b -> a) -> a -> [b] -> a

+ Prelude: foldl :: (b -> a -> b) -> b -> [a] -> b

- Prelude: scanl :: (a -> b -> a) -> a -> [b] -> [a]

+ Prelude: scanl :: (b -> a -> b) -> b -> [a] -> [b]

Files

Array.hs +2/−1
Bits.hs +1/−0
CError.hs +1/−0
CForeign.hs +1/−0
CPUTime.hs +2/−1
CString.hs +1/−0
CTypes.hs +1/−0
Char.hs +3/−2
Complex.hs +3/−2
Directory.hs +4/−3
ForeignPtr.hs +1/−0
IO.hs +7/−7
Int.hs +1/−0
Ix.hs +1/−0
List.hs +2/−1
Locale.hs +5/−4
MarshalAlloc.hs +1/−0
MarshalArray.hs +1/−0
MarshalError.hs +13/−12
MarshalUtils.hs +1/−0
Maybe.hs +1/−0
Monad.hs +3/−2
Numeric.hs +1/−1
Prelude.hs +1/−9
Ptr.hs +1/−0
Random.hs +1/−12
Ratio.hs +1/−0
StablePtr.hs +1/−0
Storable.hs +1/−0
System.hs +2/−1
Time.hs +3/−2
Word.hs +1/−0
changelog.md +11/−0
haskell98.cabal +87/−35

Array.hs view

@@ -1,10 +1,11 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif  module Array (         module Ix,  -- export all of Ix for convenience-        Array, array, listArray, (!), bounds, indices, elems, assocs, +        Array, array, listArray, (!), bounds, indices, elems, assocs,         accumArray, (//), accum, ixmap     ) where

Bits.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

CError.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

CForeign.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

CPUTime.hs view

@@ -1,8 +1,9 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif  module CPUTime (-        getCPUTime, cpuTimePrecision +        getCPUTime, cpuTimePrecision     ) where import System.CPUTime

CString.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

CTypes.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Char.hs view

@@ -1,10 +1,11 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif  module Char (-        isAscii, isLatin1, isControl, isPrint, isSpace, isUpper, isLower, -        isAlpha, isDigit, isOctDigit, isHexDigit, isAlphaNum, +        isAscii, isLatin1, isControl, isPrint, isSpace, isUpper, isLower,+        isAlpha, isDigit, isOctDigit, isHexDigit, isAlphaNum,         digitToInt, intToDigit,         toUpper, toLower,         ord, chr,

Complex.hs view

@@ -1,10 +1,11 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif  module Complex (-        Complex((:+)), realPart, imagPart, conjugate, -        mkPolar, cis, polar, magnitude, phase +        Complex((:+)), realPart, imagPart, conjugate,+        mkPolar, cis, polar, magnitude, phase     ) where  import Data.Complex

Directory.hs view

@@ -1,15 +1,16 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif  module Directory (-        Permissions( Permissions, readable, writable, executable, searchable ), -        createDirectory, removeDirectory, removeFile, +        Permissions( Permissions, readable, writable, executable, searchable ),+        createDirectory, removeDirectory, removeFile,         renameDirectory, renameFile, getDirectoryContents,         getCurrentDirectory, setCurrentDirectory,         doesFileExist, doesDirectoryExist,         getPermissions, setPermissions,-        getModificationTime +        getModificationTime     ) where  import System.Directory hiding (Permissions,

ForeignPtr.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif

IO.hs view

@@ -1,4 +1,4 @@-{-# OPTIONS_GHC -fno-warn-deprecations #-}+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif@@ -8,16 +8,16 @@         IOMode(ReadMode,WriteMode,AppendMode,ReadWriteMode),         BufferMode(NoBuffering,LineBuffering,BlockBuffering),         SeekMode(AbsoluteSeek,RelativeSeek,SeekFromEnd),-        stdin, stdout, stderr, +        stdin, stdout, stderr,         openFile, hClose, hFileSize, hIsEOF, isEOF,-        hSetBuffering, hGetBuffering, hFlush, -        hGetPosn, hSetPosn, hSeek, -        hWaitForInput, hReady, hGetChar, hGetLine, hLookAhead, hGetContents, +        hSetBuffering, hGetBuffering, hFlush,+        hGetPosn, hSetPosn, hSeek,+        hWaitForInput, hReady, hGetChar, hGetLine, hLookAhead, hGetContents,         hPutChar, hPutStr, hPutStrLn, hPrint,         hIsOpen, hIsClosed, hIsReadable, hIsWritable, hIsSeekable,-        isAlreadyExistsError, isDoesNotExistError, isAlreadyInUseError, +        isAlreadyExistsError, isDoesNotExistError, isAlreadyInUseError,         isFullError, isEOFError,-        isIllegalOperation, isPermissionError, isUserError, +        isIllegalOperation, isPermissionError, isUserError,         ioeGetErrorString, ioeGetHandle, ioeGetFileName,         try, bracket, bracket_,

Int.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Ix.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

List.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif@@ -26,7 +27,7 @@         take, drop, splitAt, takeWhile, dropWhile, span, break,         lines, words, unlines, unwords, reverse, and, or,         any, all, elem, notElem, lookup,-        sum, product, maximum, minimum, concatMap, +        sum, product, maximum, minimum, concatMap,         zip, zip3, zipWith, zipWith3, unzip, unzip3     ) where

Locale.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif@@ -6,9 +7,9 @@         TimeLocale(..), defaultTimeLocale     ) where -import System.Locale ( -	-- just the bits that are specified by Haskell 98-	TimeLocale(TimeLocale,wDays,months,amPm,dateTimeFmt,-		   dateFmt,timeFmt,time12Fmt),+import System.Locale (+        -- just the bits that are specified by Haskell 98+        TimeLocale(TimeLocale,wDays,months,amPm,dateTimeFmt,+                   dateFmt,timeFmt,time12Fmt),         defaultTimeLocale     )

MarshalAlloc.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

MarshalArray.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

MarshalError.hs view

@@ -1,20 +1,21 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif  module MarshalError (-  	module Foreign.Marshal.Error,-	IOErrorType,-	mkIOError,-	alreadyExistsErrorType,-	doesNotExistErrorType,-	alreadyInUseErrorType,-	fullErrorType,-	eofErrorType,-	illegalOperationErrorType,-	permissionErrorType,-	userErrorType,-	annotateIOError+        module Foreign.Marshal.Error,+        IOErrorType,+        mkIOError,+        alreadyExistsErrorType,+        doesNotExistErrorType,+        alreadyInUseErrorType,+        fullErrorType,+        eofErrorType,+        illegalOperationErrorType,+        permissionErrorType,+        userErrorType,+        annotateIOError   ) where  import System.IO.Error

MarshalUtils.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Maybe.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Monad.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif@@ -6,13 +7,13 @@         MonadPlus(mzero, mplus),         join, guard, when, unless, ap,         msum,-        filterM, mapAndUnzipM, zipWithM, zipWithM_, foldM, +        filterM, mapAndUnzipM, zipWithM, zipWithM_, foldM,         liftM, liftM2, liftM3, liftM4, liftM5,          -- ...and what the Prelude exports         Monad((>>=), (>>), return, fail),         Functor(fmap),-        mapM, mapM_, sequence, sequence_, (=<<), +        mapM, mapM_, sequence, sequence_, (=<<),     ) where  import Control.Monad

Numeric.hs view

@@ -1,4 +1,4 @@-{-# LANGUAGE PackageImports #-}+{-# LANGUAGE CPP, PackageImports #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Prelude.hs view

@@ -1,4 +1,4 @@-{-# LANGUAGE NoImplicitPrelude, BangPatterns, PackageImports #-}+{-# LANGUAGE BangPatterns, CPP, NoImplicitPrelude, PackageImports #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif@@ -28,13 +28,6 @@         -- *** Tuples         fst, snd, curry, uncurry, -#if defined(__NHC__)-        []((:), []),        -- Not legal Haskell 98;-                            -- ... available through built-in syntax-        module Data.Tuple,  -- Includes tuple types-        ()(..),             -- Not legal Haskell 98-        (->),               -- ... available through built-in syntax-#endif #ifdef __HUGS__         (:),                -- Not legal Haskell 98 #endif@@ -158,7 +151,6 @@ import qualified GHC.Real ( gcd ) import GHC.Float import GHC.Show-import GHC.Err   ( undefined ) #endif  #ifdef __HUGS__

Ptr.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Random.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif@@ -37,15 +38,9 @@  import Data.Int -#ifdef __NHC__-import CPUTime          ( getCPUTime )-import Foreign.Ptr      ( Ptr, nullPtr )-import Foreign.C        ( CTime, CUInt )-#else import System.CPUTime   ( getCPUTime ) import Data.Time        ( getCurrentTime, UTCTime(..) ) import Data.Ratio       ( numerator, denominator )-#endif import Data.Char        ( isSpace, chr, ord ) import System.IO.Unsafe ( unsafePerformIO ) import Data.IORef@@ -54,17 +49,11 @@ -- The standard nhc98 implementation of Time.ClockTime does not match -- the extended one expected in this module, so we lash-up a quick -- replacement here.-#ifdef __NHC__-foreign import ccall "time.h time" readtime :: Ptr CTime -> IO CTime getTime :: IO (Integer, Integer)-getTime = do CTime t <- readtime nullPtr;  return (toInteger t, 0)-#else-getTime :: IO (Integer, Integer) getTime = do   utc <- getCurrentTime   let daytime = toRational $ utctDayTime utc   return $ quotRem (numerator daytime) (denominator daytime)-#endif  -- | The class 'RandomGen' provides a common interface to random number -- generators.

Ratio.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

StablePtr.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

Storable.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

System.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif@@ -9,4 +10,4 @@  import System.Exit import System.Environment-import System.Cmd+import System.Process

Time.hs view

@@ -1,9 +1,10 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Trustworthy #-} #endif  module Time (-        ClockTime, +        ClockTime,         Month(January,February,March,April,May,June,               July,August,September,October,November,December),         Day(Sunday,Monday,Tuesday,Wednesday,Thursday,Friday,Saturday),@@ -13,7 +14,7 @@                  tdMin, tdSec, tdPicosec),         getClockTime, addToClockTime, diffClockTimes,         toCalendarTime, toUTCTime, toClockTime,-        calendarTimeToString, formatCalendarTime +        calendarTimeToString, formatCalendarTime     ) where  import System.Time

Word.hs view

@@ -1,3 +1,4 @@+{-# LANGUAGE CPP #-} #if __GLASGOW_HASKELL__ >= 701 {-# LANGUAGE Safe #-} #endif

+ changelog.md view

@@ -0,0 +1,11 @@+# Changelog for [`haskell98` package](http://hackage.haskell.org/package/haskell98)++## 2.0.0.3 *Mar 2014*++  - Bundled with GHC 7.8.1++  - Remove NHC98-specific code++  - Adapt to changes in GHC 7.8's core-libaries++  - Update to Cabal format 1.10

haskell98.cabal view

@@ -1,42 +1,94 @@-name:		haskell98-version:	2.0.0.2-license:	BSD3-license-file:	LICENSE-maintainer:	libraries@haskell.org-bug-reports: http://hackage.haskell.org/trac/ghc/newticket?component=libraries/haskell98-synopsis:	Compatibility with Haskell 98-category:   Haskell98-description:-	This package provides compatibility with the modules of Haskell-	98 and the FFI addendum, by means of wrappers around modules from-	the base package (which in many cases have additional features).-	However Prelude, Numeric and Foreign are provided directly by-	the base package.-homepage:	http://www.haskell.org/definition/+name:           haskell98+version:        2.0.0.3+-- GHC 7.6.1 released with 2.0.0.2+license:        BSD3+license-file:   LICENSE+maintainer:     libraries@haskell.org+bug-reports:    http://ghc.haskell.org/trac/ghc/newticket?component=libraries/haskell98+synopsis:       Compatibility with Haskell 98+category:       Haskell98, Prelude+homepage:       http://www.haskell.org/definition/ build-type:     Simple-Cabal-Version: >= 1.6+cabal-version:  >=1.10+description:+    This package provides compatibility with the modules of Haskell+    98 and the FFI addendum, by means of wrappers around modules from+    the base package (which in many cases have additional features).+    However "Prelude", "Numeric" and "Foreign" are provided directly by+    the @base@ package. +extra-source-files:+    changelog.md++source-repository head+    type:     git+    location: http://git.haskell.org/packages/haskell98.git++source-repository this+    type:     git+    location: http://git.haskell.org/packages/haskell98.git+    tag:      haskell98-2.0.0.3-release+ Library-    build-depends:	base        >= 3   && < 5,-                    directory   >= 1.1 && < 1.3,-                    old-time    >= 1.0 && < 1.2,-                    old-locale  >= 1.0 && < 1.1,-                    process     >= 1.0 && < 1.2,-                    array       >= 0.3 && < 0.5,-                    time        >= 1.2 && < 1.5+    default-language: Haskell98+    other-extensions:+        BangPatterns+        CPP+        NoImplicitPrelude+        PackageImports+    if impl(ghc)+        other-extensions:+            Safe+            Trustworthy++    build-depends:+        array       >= 0.5 && < 0.6,+        base        >= 4.7 && < 4.8,+        directory   >= 1.2 && < 1.3,+        old-locale  >= 1.0 && < 1.1,+        old-time    >= 1.1 && < 1.2,+        process     >= 1.2 && < 1.3,+        time        >= 1.4 && < 1.5++    -- haskell98 is a "hidden" package+    exposed: False+     exposed-modules:         -- Haskell 98-        Prelude, Array, CPUTime, Char, Complex, Directory, IO,-        Ix, List, Locale,-        Maybe, Monad, Numeric, Random, Ratio, System, Time,-        -- FFI addendum (Foreign is in the base package)-        Bits, CError, CForeign, CString, CTypes, ForeignPtr, Int,-        MarshalAlloc, MarshalArray, MarshalError, MarshalUtils, Ptr,-        StablePtr, Storable, Word-    exposed: False-    extensions: CPP+        Prelude -source-repository head-    type:     git-    location: http://darcs.haskell.org/packages/haskell98.git/+        Array+        CPUTime+        Char+        Complex+        Directory+        IO+        Ix+        List+        Locale+        Maybe+        Monad+        Numeric+        Random+        Ratio+        System+        Time +        -- FFI addendum (Foreign is in the base package)+        Bits+        CError+        CForeign+        CString+        CTypes+        ForeignPtr+        Int+        MarshalAlloc+        MarshalArray+        MarshalError+        MarshalUtils+        Ptr+        StablePtr+        Storable+        Word++    ghc-options: -Wall