internal error: RTS exhausted max heap size (GHC 6.0.1)

Athlon, Windows 2000, 512MB RAM, GHC 6.0.1 installed from
www.haskell.org/ghc/dist/6.0.1/ghc-6-0-1.msi.

> copy con bug.hs
import Data.Array.IO (IOUArray)
import Data.Array.MArray (newArray)
import Data.Word (Word8)

emptyArray :: IO (IOUArray Int Word8)
emptyArray = newArray (1,16000000) 0

main = undefined
^Z
> ghci bug.hs
   ___         ___ _
  / _ \ /\  /\/ __(_)
 / /_\// /_/ / /  | |      GHC Interactive, version 6.0.1, for Haskell 98.
/ /_\\/ __  / /___| |      http://www.haskell.org/ghc/
\____/\/ /_/\____/|_|      Type :? for help.

Loading package base ... linking ... done.
Compiling Main             ( bug.hs, interpreted )
Ok, modules loaded: Main.
*Main> foo <- newArray (1,16000000) 0 :: IO (IOUArray Int Word8)
*Main> bar <- emptyArray
<interactive>: internal error: RTS exhausted max heap size (268435456 bytes)

    Please report this as a bug to glasgow-haskell-bugs@xxxxxxxxxxx,
    or http://www.sourceforge.net/projects/ghc/


The "foo <-" line also runs far more slowly than I'd expect it to.


-- Ben