Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | included an explicit return in the request handler continuation |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
7b68b3ded9c77372ba97bfc32b122218 |
User & Date: | murphy 2011-09-23 21:24:01.715 |
Context
2011-09-23
| ||
21:26 | added an example for suspensions check-in: e9f3970674 user: murphy tags: trunk | |
21:24 | included an explicit return in the request handler continuation check-in: 7b68b3ded9 user: murphy tags: trunk | |
20:39 | Updated the .meta file check-in: 626e07cb91 user: murphy tags: trunk | |
Changes
Changes to webgate.scm.
︙ | ︙ | |||
682 683 684 685 686 687 688 | (make-thread (lambda () (call-with-current-continuation (lambda (return) (thread-specific-set! (current-thread) (%make-resource-context getenv return)) | | > > | 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 | (make-thread (lambda () (call-with-current-continuation (lambda (return) (thread-specific-set! (current-thread) (%make-resource-context getenv return)) (let ((rsp (proc parameters))) ((resource-context-return (current-resource-context)) rsp)))))))))) (else (make-error-response 404 "The requested resource was not found by the server."))) (make-response 204 '())))) output-port)) ) |
︙ | ︙ |