signature APACHE = sig
+ val registerPre : ({user : string, nodes : string list, id : string, hostname : string} -> unit) -> unit
+ (* Register a callback for the beginning of a vhost block. *)
+
+ val registerPost : (unit -> unit) -> unit
+ (* Register a callback for the end of a vhost block. *)
+
+ val registerAliaser : (string -> unit) -> unit
+ (* Register a callback for an alternate hostname that is configured. *)
+
end