# Module `Ocsigen_response.Body`

```ocaml
type t
```
```ocaml
val empty : t
```
```ocaml
val of_string : string -> t
```
```ocaml
val make : 
  Cohttp.Transfer.encoding ->
  ((string -> unit Lwt.t) -> unit Lwt.t) ->
  t
```
`make writer` makes a reponse body whose content is generated by `writer write`. `write str` blocks until `str` is fully written.

```ocaml
val of_cohttp : encoding:Cohttp.Transfer.encoding -> Cohttp_lwt.Body.t -> t
```
```ocaml
val write : t -> (string -> unit Lwt.t) -> unit Lwt.t
```
```ocaml
val transfer_encoding : t -> Cohttp.Transfer.encoding
```