``Devils and Angels'', as defined in [Friedman, 84] is an exercise in continuation programming, which you hopefully might find amusing. This is a Haskell implementation of ``Devils and Angels'' in [Friedman, 84], with a small example. You can execute it in Hugs by first loading the project P, then evaluating the example. The implementation consists of the following files: P The Hugs project file Stack.hs A stack abstraction Cont.hs Provides a continuation monad, on top of a state monad with two stacks. Devils.hs Provides the devil primitives milestone, devil, and angel Example.hs A little example