Function Accept-Connection

Part of:

package trivial-sockets
( accept-connection < socket > &key < external-format > < element-type > )