Update Continuations.hs