Is the following a correct translation of this guard clause:
(guard (var cond-clause ....) body)
First assume there is an else clause:
(call/cc (k)
(with-exception-handler
(lambda (var)
(k (cond cond-clause ...)))
(lambda () body)))
If there is no else clause:
(call/cc (k)
(with-exception-handler
(lambda (var)
(k (cond cond-clause ... (else (raise-continuable var)))))
(lambda () body)))
_______________________________________________ Scheme-reports mailing list Scheme-reports@x http://lists.scheme-reports.org/cgi-bin/mailman/listinfo/scheme-reports