Dispatch.Log
val ok : (msg:string -> 'a) -> string -> 'a
val notfound : (msg:string -> 'a) -> string -> 'a
val redirect : (msg:string -> 'a) -> string -> 'a