-- Utilities for Constructing Events -------------------------------------------

servEv :: HttpServerEv -> Ev
servEv = EvBlip . BlipEvHttpServer
servEv :: HttpServerEv -> Ev
servEv = EvBlip . BlipEvHttpServer
servEv = EvBlip . BlipEvHttpServer