/usr/lib/s9fes/help/letslashcc is in scheme9 2010.11.13-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | S9 LIB (let/cc <name> . <body>) ==> object
(load-from-library "letcc.scm")
Bind the current continuation to <name> and evaluate <body> with
that binding in effect.
(let/cc exit
(letrec
((f (lambda (x)
(cond ((null? x) 0)
((pair? x) (+ 1 (f (cdr x))))
(else (exit 'foo))))))
(f '(1 2 3 . 4)))) ==> foo
|