[GHC] #1679: ^C on zipperfs leads to crash

[GHC]

#1679: ^C on zipperfs leads to crash
-----------------------+----------------------------------------------------
  Reporter:  sorear    |          Owner:       
      Type:  bug       |         Status:  new  
  Priority:  normal    |      Milestone:       
 Component:  Compiler  |        Version:  6.6.1
  Severity:  normal    |       Keywords:       
Difficulty:  Unknown   |             Os:  Linux
  Testcase:            |   Architecture:  x86  
-----------------------+----------------------------------------------------
Attempting to ^C out of Oleg's zipperfs demo
 <http://okmij.org/ftp/packages/ZFS.tar.gz> leads to a ghci crash:

 {{{
 stefan at 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 at 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.

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

 Stefan

-- 
Ticket URL: <http://hackage.haskell.org/trac/ghc/ticket/1679>
GHC <http://www.haskell.org/ghc/>
The Glasgow Haskell Compiler