captures and returns the current continuation. Typically used as follows
(let ((cc (current))) (if (continuation? cc) ... (throw cc val) ... ... do something with val ...))
Note, that the let is invoked twice, first after the call to current, then with the object val, which was thrown to cc.