GHCi crash GHC with creation of a "crash dump file" in Windows

Hi,\\ I repeated this several times in order and GHC crash after typing the command :r several times in GHCi\\ If the two files are taken separately there is no crash\\

file test1.hs

main :: IO ()
main = do {
             putStr "hello";
             x <- getChar;
             putStr "x = ";
             print x;
           }

file test2.hs

putStr :: String -> IO ()
putStr [] = return ()
putStr (x:xs) = do putChar x
                   putChar '\n'

putStrLn :: String -> IO ()
putStrLn xs = do putStr xs
                 putChar '\n'

1- open GHCi\\ 2- :load test1.hs\\ 3- run main\\ 4- :load test2.hs\\ 5- an error message comes then type :r\\ 6- keep trying :r until the crash of GHC. usually at the end of the third time.\\ 7- see the Windows message to the screen.\\

a "crash dump file" is created. It say:\\ exception code 0xC0000096\\ process name: ghc.exe: C:\ghc-8.0.2\bin\ghc.exe\\ information: the thread tried to execute a statement that the operation is not allowed in the current mode of the computer\\ modules name:\\ ghc.exe, ntdll.dll, kernel32.dll, gdi32.dll, user32.dll, advapi32.dll, rpcrt4.dll, msvcrt.dll, shell32.dll, shlwapi.dll, wsock32.dll, ws2_32.dll, nsi.dll, imm32.dll, msctf.dll, lpk.dll, usp10.dll, comctl32.dll, ole32.dll, userenv.dll, secur32.dll, apphelp.dll\\ a particularly pointed to by Windows file is msvcrt.dll\\

Hope this help

Trac metadata

Trac field	Value
Version	8.0.2
Type	Bug
TypeOfFailure	OtherFailure
Priority	normal
Resolution	Unresolved
Component	Compiler
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture