added kont & kexp functions to cps.lisp