bhead is not a function

[felixSchl]

The following code crashes with the error "bhead is not a function". I am trying to obtain a fiber which is guaranteed to be cleaned up without having to rely on the supervise function.

        fiber <- forkAff do
          bracket
            (forkAff do
              forever do
                delay $ 100.0 # Milliseconds
                traceAnyA "a"
             )
             (killFiber $ error "DONE")
             (\fiber -> do
                delay $ 100.0 # Milliseconds
                joinFiber fiber
             )
        delay $ 50.0 # Milliseconds
        killFiber (error "...") fiber

[felixSchl]

I just tried your branch and it works flawlessly :)