[Chicken-users] A question about http-server demo code.

[Ed Watkeys]

In the demo code...

> (require-extension http-server)
>
> (http:add-resource '("/" "/index.html")
>   (lambda (r a)
>     (http:write-response-header)
>     (let ([msg "<h1>Hello, world!</h1>"])
>       (print "Content-type: text/html\r\nContent-length: " (add1  
> (string-length msg)) "\r\n\r\n" msg) ) ) )
>
> ((http:make-server 4242) #t)

One is added to the length of the message. Why?

Regards,
Ed

--
Transmogrify, LLC * <http://xmog.com/>