hClose: don't raise an exception when passed a handle that's already closed,
i.e.,

    h <- openFile "a" ReadMode >> hClose h >> hClose h

will now succeed (provided 'a' exists and is readable, of course.)
Repeated hClose's are just redundant.