semantischer Bereich:
type Continuation a = a -> Action Val date CPS a = CPS ( Continuation a -> Action Val ) evaluate :: Env -> Exp -> CPS Val
Label, Jump
>>=
instance Monad CPS
Action Val
lift