MonadicIT.Hack for some testing