scsh-conservatory
/
sunet
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

added comments

This commit is contained in:
vibr 2004-05-17 16:42:45 +00:00
parent 96216b243d
commit 1bd77d4b10
1 changed files with 12 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
scheme/httpd/response.scm
View File

@ -8,12 +8,18 @@
(define-record-type http-response :http-response (define-record-type http-response :http-response
(make-response code message seconds mime extras body) (make-response code message seconds mime extras body)
response? response?
(code response-code) (code response-code) ;;HTTP status code
(message response-message) (message response-message);;reason phrase: textual description of
(seconds response-seconds) ;;status-code, or #f (-> server sends
(mime response-mime) ;;default reason phrase)
(extras response-extras) (seconds response-seconds);;time the content was created
(body response-body)) (mime response-mime);;string indicating the MIME type of the response
(extras response-extras);;assoc list with extra headers to be
;;added to the response; its elements are
;;pairs, each of which consists of a symbol
;;representing the field name and a string
;;representing the field value.
(body response-body));; message-body
;; This is mainly for nph-... CGI scripts. ;; This is mainly for nph-... CGI scripts.
;; This means that the body will output the entire MIME message, not ;; This means that the body will output the entire MIME message, not