hGetContents: close the handle properly on error

When hGetContents caught an error it was closing the handle and then
throwing the exception, without updating the handle with the new
closed state.  This lead to a double-closed, which was the cause of

*** glibc detected *** ./Setup: double free or corruption

when iconv_close was called twice on the decoder.

See http://hackage.haskell.org/trac/hackage/ticket/609

Fix arities of mapFB and zipFB

Remove an unnecessary -fno-warn-orphans flag

Tweak layout to work with alternative layout rule

Tweak layout to be accepted by the alternative layout rul

Make sure zipWithFB has arity 2

It gets 2 arguments in the "zipWith" rule but its arity was higher and the new
inliner didn't inline it sometimes, for instance here:

mpp ::  [Double] -> [Double] -> [Double] -> [Double] -> [Double]
mpp as bs cs ds = zipWith (*) (zipWith (+) as bs) (zipWith (+) cs ds)

This was a regression vs. 6.10.

Remove an old comment

De-orphan the Eq/Ord Integer instances

Whitespace only

Derive some more instances, rather than writing them by hand

We can now derive Ord ()

De-orphan tuple Eq/Ord instances

Control.Exception.Base no longer has any orphans

De-orphan the MonadFix ST instance for GHC

Rearrange the contents of Control.Monad.ST; no functionality changes

De-orphan the Eq/Ord [a] instances

De-orphan the Eq/Ord Char instances

De-orphan the Eq/Ord Bool instances

Move Eq/Ord Ordering instances to de-orphan them

Remove ffi warnings for nhc98.

Second attempt to fix #1185 (forkProcess and -threaded)

Patch 2/2: first patch is to ghc

This time without dynamic linker hacks, instead I've expanded the
existing rts/Globals.c to cache more CAFs, specifically those in
GHC.Conc.  We were already using this trick for signal handlers, I
should have realised before.

It's still quite unsavoury, but we can do away with rts/Globals.c in
the future when we switch to a dynamically-linked GHCi.

Rollback #1185 fix

rolling back:

Tue Nov  3 16:05:40 GMT 2009  Simon Marlow <marlowsd@gmail.com>
  * Fix #1185: restart the IO manager after fork()

  This is the libraries/base part of the patch; there is a corresponding
  patch to GHC itself.

  The main change is that we now keep track of the IO manager's ThreadId
  in a top-level MVar, and ensureIOManagerIsRunning checks whether a
  previous IO manager thread is alive before starting one.  In the child
  of fork(), we can hence call ensureIOManagerIsRunning to restart the
  IO manager.

    M ./GHC/Conc.lhs -46 +44

Wed Nov  4 17:49:45 GMT 2009  Ian Lynagh <igloo@earth.li>
  * Fix the build on Windows

    M ./GHC/Conc.lhs -6 +4

Fix the build on Windows

Fix #1185: restart the IO manager after fork()

This is the libraries/base part of the patch; there is a corresponding
patch to GHC itself.

The main change is that we now keep track of the IO manager's ThreadId
in a top-level MVar, and ensureIOManagerIsRunning checks whether a
previous IO manager thread is alive before starting one.  In the child
of fork(), we can hence call ensureIOManagerIsRunning to restart the
IO manager.

improve the documentation for throwErrnoIfRetry

Don't inline unpackFoldrCString ever

Inline more default methods

Namely Monad: (>>)
       Eq:    (==), (/=)
       Num:   (-), negate
       Real:  quot, rem, div, mod, recip, (/), truncate
       Float: (**), logBase, sqrt, tan, tanh

Move error messages out of INLINEd default methods

No need to duplicate the error generation!

Exploit now-working default-method INLINE pragmas for Data.Bits

* Add INLINE pragmas to default methods for class Bits

* Remove redundant instance methods elsewhere, now that
  the default method will do the job

Tidy up and comment imports

Inline foldr and (.) when applied to two arguments not three

The new INLINE story is (by design) arity-sensitive, so we must
put fewer argument on the LHS for foldr and (.)

dirUtils.c no longer available

Make hGetContents throw an exception if an error is encountered

Strictly speaking this breaks Haskell 98 compatibility, which requires
hGetContents to just end the lazy stream silently if an error is
encountered.  However, for a few reasons we think it will make
everyone's life a bit easier if we make this change

 1. Errors will be a lot more common in GHC 6.12.1, in the form
    of Unicode decoding errors.

 2. When Haskell 98 was designed, we didn't know how to throw
    exceptions from inside lazy I/O, but now we do.

 3. If anyone is actually relying on the previous behaviour, their
    code is arguably broken.

Re-instate System.Console.Getopt for nhc98 builds.
Although it was split out of base a while back, that change was
reverted for ghc soon afterwards, but nhc98 never noticed.

Roll back "Another instance of nhc98's strange import semantics."
Fri Oct  9 14:50:51 BST 2009  Malcolm.Wallace@cs.york.ac.uk
GHC (correctly) warns about the unused import, which breaks the validate
build.

Roll back "Cope with nhc98's (occasionally-strange) import semantics"
Fri Oct  9 14:43:51 BST 2009  Malcolm.Wallace@cs.york.ac.uk
GHC (correctly) warns about the unused import, which breaks the validate
build.

It seems that nhc98 needs defaulting in Data.Fixed.

Another instance of nhc98's strange import semantics.

Make Data.Functor compatible with non-GHC compilers.

Cope with nhc98's (occasionally-strange) import semantics.

Fix gratuitous breakage of nhc98 in System.IO.

Fix gratuitous breakage of nhc98 in Control.Exception.Base.

Fix gratuitous breakage of non-GHC in Data.Fixed.

Fix gratuitous breakage for non-GHC in Data.Bits.

Use UTF-32LE instead of UTF32LE
The latter is not recognised by some iconv implementations.

Strip any Byte Order Mark (BOM) from the front of decoded streams.
When decoding to UTF-32, Solaris iconv inserts a BOM at the front
of the stream, but Linux iconv doesn't.

use UTF32BE/UTF32LE instead of UCS-4/UCS-4LE

Strip any Byte Order Mark (BOM) from the front of decoded streams.
When decoding to UTF-32, Solaris iconv inserts a BOM at the front
of the stream, but Linux iconv doesn't.

Add traceEvent :: String -> IO ()
For emitting an event via the RTS tracing framework

Fix the error message when flushing the read buffer of a non-seekable Handle

Fix #3534: No need to flush the byte buffer when setting binary mode

Use let !y = x in .. x .. instead of seq in $! and evaluate (#2273)

make some Applicative functions into methods, and split off Data.Functor (proposal #3335)

The following functions

    (<$) :: Functor f => a -> f b -> f a
    (*>) :: Applicative f => f a -> f b -> f b
    (<*) :: Applicative f => f a -> f b -> f a
    some :: Alternative f => f a -> f [a]
    many :: Alternative f => f a -> f [a]

are moved into the corresponding classes, with the existing implementations
as default definitions.  This gives people creating instances the option of
defining specialized implementations of these functions, though they should
be equivalent to the default definitions.

Although (<$) is now a method of the Functor class, it is hidden in the
re-export by the Prelude, Control.Monad and Monad.  The new module
Data.Functor exposes the full class, plus the function (<$>).  These are
also re-exported by Control.Applicative.

On Windows, use the console code page for text file encoding/decoding.

We keep all of the code page tables in the module
GHC.IO.Encoding.CodePage.Table.  That file was generated automatically
by running codepages/MakeTable.hs; more details are in the comments at the
start of that script.

Storing the lookup tables adds about 40KB to each statically linked executable;
this only increases the size of a "hello world" program by about 7%.

Currently we do not support double-byte encodings (Chinese/Japanese/Korean), since
including those codepages would increase the table size to 400KB.  It will be
straightforward to implement them once the work on library DLLs is finished.

Fix "init" docs: the input list need not be finite. Fixes trac #3465

Bump base version to 4.2.0.0

Address #3310

 - Rename BlockedOnDeadMVar   -> BlockedIndefinitelyOnMVar
 - Rename BlockedIndefinitely -> BlockedIndefinitelyOnSTM
 - instance Show BlockedIndefinitelyOnMVar is now
     "blocked indefinitely in an MVar operation"
 - instance Show BlockedIndefinitelyOnSTM is now
     "blocked indefinitely in an STM transaction"

clients using Control.OldException will be unaffected (the new
exceptions are mapped to the old names).  However, for base4-compat
we'll need to make a version of catch/try that does a similar
mapping.

Fix unicode conversion for MSB architectures
This fixes the SPARC/Solaris build.

Fix #3441: detect errors in partial sequences

Fix hWaitForInput
It was erroneously waiting when there were bytes to decode waiting in
the byte buffer.

fix debugging code

Allow for configurable iconv include and library locations.
This should help to fix the build on OpenBSD.

typo in comment

un-hide some modules from the Haddock docs

Apply fix for #1548, from squadette@gmail.com

improvements to Data.Fixed: instances for Typeable and Data, more predefined types

Fix "Cabal check" warnings

Add a GHC.Constants module; fixes trac #3094

Apply proposal #3393
Add openTempFileWithDefaultPermissions and
openBinaryTempFileWithDefaultPermissions.

Add some more C wrappers; patch from Krister Walfridsson
Fixes 21 testsuite errors on NetBSD 5.99.

Fixing configure for autoconf 2.64

add INLINE toList

In anticipation of the fixing of #2353.

fix a copyright

Tweak the BufferedIO class to enable a memory-mapped file implementation
We have to eliminate the assumption that an empty write buffer can be
constructed by setting the buffer pointers to zero: this isn't
necessarily the case when the buffer corresponds to a memory-mapped
file, or other in-memory device implementation.

Deprecate Control.OldException

Windows build fix, following RTS tidyup

Updates to follow the RTS tidyup
C functions like isDoubleNaN moved here (primFloat.c)

Add integer-simple as a build option

Use shift[LR]Integer in the Bits Integer instance

depend directly on integer-gmp, rather than indirecting through integer

Move the instances of Functor and Monad IO to GHC.Base, to avoid orphans

move "instance Exception Dynamic" so it isn't an orphan

Improve the index checking for array accesses; fixes #2120 #2669
As well as checking that offset we are reading is actually inside the
array, we now also check that it is "in range" as defined by the Ix
instance. This fixes confusing behaviour (#2120) and improves some error
messages (#2669).

Make chr say what its argument was, if it's a bad argument

remove unused warning

warning fix: -fno-implicit-prelude -> -XNoImplicitPrelude

Add hGetEncoding :: Handle -> IO (Maybe TextEncoding)
as suggested during the discussion on the libraries list

Add more documentation to mkTextEncoding
noting that "//IGNORE" and "//TRANSLIT" suffixes can be used with GNU
iconv.

Add the utf8_bom codec
as suggested during the discussion on the libraries list.

Export Unicode and newline functionality from System.IO; update Haddock docs

add a comment about the non-workingness of CHARBUF_UTF16

Fix build on Windows

Fix some "warn-unused-do-bind" warnings where we want to ignore the value

Use throwErrnoIfMinus1_ when calling getrusage

Remove an unused import

reportStackOverflow now returns IO ()
It used to do "return undefined" to return IO a.

GHC.Conc.reportError now returns IO ()
It used to return IO a, by "return undefined".

Fix some "warn-unused-do-bind" warnings where we want to ignore the value

Minor SampleVar refactoring

Fix "warn-unused-do-bind" warnings in GHC/IO/Handle/Text.hs