use synchronous channel for receiving

This means we can now (sync (socket-receive-evt socket))...

Signed-off-by: Jan Dvořák <mordae@anilinux.org>