;; Maybe the wrong place for this, or for it to be exported.
;; But it's used in websockets' server implementation at least...
;; Maybe the wrong place for this, or for it to be exported.
;; But it's used in websockets' server implementation at least...
"Wrap possibly multi-value function in a procedure, applies all arguments"
(lambda args
(apply body args)))
(define-syntax-rule (build-actions (symbol method) ...)
"Construct an alist of (symbol . method), where the method is wrapped
"Wrap possibly multi-value function in a procedure, applies all arguments"
(lambda args
(apply body args)))
(define-syntax-rule (build-actions (symbol method) ...)
"Construct an alist of (symbol . method), where the method is wrapped