ocaml: add the skeleton of a server dispatch functor
ocaml: add the skeleton of a server dispatch functor

djs55/message-switch-1,djs55/message-switch,djs55/message-switch-1,djs55/message-switch-1,xapi-project/message-switch,djs55/message-switch,djs55/message-switch,xapi-project/message-switch,xapi-project/message-switch