t; IO (Maybe (Message i))</li><li class="src short"><span class="keyword">data</span>  <a href="#t:ServerA">ServerA</a> i o</li><li class="src short"><a href="#v:srvName">srvName</a> :: <a href="Network-Mom-Stompl-Patterns-Basic.html#t:ServerA">ServerA</a> i o -&gt; String</li><li class="src short"><a href="#v:withServer">withServer</a> ::  Con -&gt; String -&gt; ReaderDesc i -&gt; WriterDesc o -&gt; (<a href="Network-Mom-Stompl-Patterns-Basic.html#t:ServerA">ServerA</a> i o -&gt; IO r) -&gt; IO r</li><li c