view release on metacpan or  search on metacpan

xs/Unpacker.xs  view on Meta::CPAN

		msgpack_unpacker_buffer_consumed (&self->unpacker, size);

void
next (self)
	Unpacker self

	PREINIT:
		msgpack_unpacked u;
		msgpack_unpack_return ret;

	PPCODE:
		msgpack_unpacked_init (&u);
		ret = msgpack_unpacker_next (&self->unpacker, &u);
		switch (ret)
		{
			case MSGPACK_UNPACK_SUCCESS:
				mXPUSHs (decode_msgpack (&u.data));
				msgpack_unpacked_destroy (&u);
				XSRETURN (1);
				break;