(http-respone-body <http-response>) -> string
Given a <http-response>, return the HTTP body defined.
>> (define resp (make-channel)):: [channel 589AC0] >> (write-http-response resp 200 "Peachy" '("Content-Type: text/text") "Life is peachy") :: null >> (define http-resp (read-http-response resp)) :: [http-response [vector null 200 "Peachy" [dict ...] "Life is peachy" #f [primitive input]]] >> (http-response-body http-resp) :: "Life is peachy"