| Paste number 94632: | with-request-vars |
| Pasted by: | mario-goulart |
| When: | 1 month, 4 hours ago |
| Share: | Tweet this! | http://paste.lisp.org/+210O |
| Channel: | #chicken |
| Paste contents: |
(define-syntax with-request-vars
(syntax-rules ()
((_ (var1 ...) e1 e2 ...)
(let* ((% (request-vars))
(var1 (% (quote var1)))
...)
e1 e2 ...))))
(define-syntax with-request-vars*
(syntax-rules ()
((_ % (var1 ...) e1 e2 ...)
(let* ((var1 (% (quote var1)))
...)
e1 e2 ...))))
This paste has no annotations.