(*
OCaml HTTP - do it yourself (fully OCaml) HTTP daemon
- Copyright (C) <2002> Stefano Zacchiroli <zack@cs.unibo.it>
+ Copyright (C) <2002-2004> Stefano Zacchiroli <zack@cs.unibo.it>
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
val _contentsBuf = Buffer.create 1024
val _headers = Hashtbl.create 11
- val mutable _version: version = version
+ val mutable _version: version option = version
initializer
self#setBody body;
self#addHeaders headers
method version = _version
- method setVersion v = _version <- v
+ method setVersion v = _version <- Some v
method body = Buffer.contents _contentsBuf
method setBody c =