(*
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
let server_string = "OCaml HTTP Daemon" ;;
let crlf = "\r\n" ;;
-let default_addr = "0.0.0.0" ;;
-let default_port = 80 ;;
-let default_timeout = 300 ;;
-let default_mode = `Fork ;;
+let default_addr = "0.0.0.0"
+let default_auth = None
+let default_callback = fun _ _ -> ()
+let default_mode = `Fork
+let default_port = 80
+let default_root_dir = None
+let default_exn_handler = Some (fun exn outchan -> ())
+let default_timeout = Some 300