^C on zipperfs leads to crash

Attempting to ^C out of Oleg's zipperfs demo <http://okmij.org/ftp/packages/ZFS.tar.gz> leads to a ghci crash:

stefan@stefans:/usr/local/src/ZFS$ ghci-6.6.1 ZFS.hs 
   ___         ___ _
  / _ \ /\  /\/ __(_)
 / /_\// /_/ / /  | |      GHC Interactive, version 6.6.1, for Haskell 98.
/ /_\\/ __  / /___| |      http://www.haskell.org/ghc/
\____/\/ /_/\____/|_|      Type :? for help.

Loading package base ... linking ... done.
[1 of 5] Compiling PromptTR         ( PromptTR.hs, interpreted )
[2 of 5] Compiling SeqTR            ( SeqTR.hs, interpreted )
[3 of 5] Compiling CC_FrameT        ( CC_FrameT.hs, interpreted )
[4 of 5] Compiling ZipperM          ( ZipperM.hs, interpreted )
[5 of 5] Compiling ZFS              ( ZFS.hs, interpreted )
Ok, modules loaded: ZFS, ZipperM, CC_FrameT, SeqTR, PromptTR.
*ZFS> main
Loading package unix-2.1 ... linking ... done.
Loading package mtl-1.0.1 ... linking ... done.
Loading package parsec-2.0 ... linking ... done.
Loading package network-2.0.1 ... linking ... done.
Entering the osloop<socket: 5>
<interactive>: internal error: interpretBCO: unknown or unimplemented opcode 22384
    (GHC version 6.6.1 for i386_unknown_linux)
    Please report this as a GHC bug:  http://www.haskell.org/ghc/reportabug
Aborted (core dumped)
stefan@stefans:/usr/local/src/ZFS$ 

After "Entering the osloop<socket: 5>", I pressed ^C once, then attempted to connect to the server.

The number is different each time.

This may be related to #1103 (closed).

Core file will be sent on request (8.6MB compressed)

Stefan

Trac metadata

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