/*
 * call-seq:
 *
 *      socket.kgio_peek(maxlen)           ->  buffer
 *      socket.kgio_peek(maxlen, buffer)   ->  buffer
 *
 * Like kgio_read, except it uses MSG_PEEK so it does not drain the
 * socket buffer.  A subsequent read of any type (including another peek)
 * will return the same data.
 */
static VALUE kgio_peek(int argc, VALUE *argv, VALUE io)
{
        return my_peek(1, argc, argv, io);
}