patch applied (ghc): Eagerly raise a blocked exception when entering ' unblock' or exiting ' block'

Simon Marlow <[email protected]> Fri, 5 Jan 2007 05:58:30 -0800

Newsgroups	gmane.comp.lang.haskell.cvs.all
Message-ID	<20070105135830.GA23218__15214.3346415416$1168005522$gmane$org@cvs.haskell.org>

Fri Jan  5 05:57:15 PST 2007  Simon Marlow <[email protected]>
  * Eagerly raise a blocked exception when entering 'unblock' or exiting 'block'
  This fixes #1047

    M ./rts/Exception.cmm -5 +50
    M ./rts/RaiseAsync.c -2 +6
    M ./rts/RaiseAsync.h -1 +1