definition module ClientServerCommunication

class SendAddressToClient a
where {
	SendAddressToClient :: a !(IOState *s) -> !(IOState *s)
};

instance SendAddressToClient !Int;
instance SendAddressToClient !{#Char};