From 1bd77d4b104f23f7d867a6c7942541c66cf9d370 Mon Sep 17 00:00:00 2001 From: vibr Date: Mon, 17 May 2004 16:42:45 +0000 Subject: [PATCH] added comments --- scheme/httpd/response.scm | 18 ++++++++++++------ 1 file changed, 12 insertions(+), 6 deletions(-) diff --git a/scheme/httpd/response.scm b/scheme/httpd/response.scm index 80903ce..4fa7873 100644 --- a/scheme/httpd/response.scm +++ b/scheme/httpd/response.scm @@ -8,12 +8,18 @@ (define-record-type http-response :http-response (make-response code message seconds mime extras body) response? - (code response-code) - (message response-message) - (seconds response-seconds) - (mime response-mime) - (extras response-extras) - (body response-body)) + (code response-code) ;;HTTP status code + (message response-message);;reason phrase: textual description of + ;;status-code, or #f (-> server sends + ;;default reason phrase) + (seconds response-seconds);;time the content was created + (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 means that the body will output the entire MIME message, not