Protocol::Redis::XS nil tests

nil.t

use strict;
use warnings;
use Test::More;

use Protocol::Redis::XS;
my $redis = new_ok 'Protocol::Redis::XS', [api => 1];

$redis->parse("\$-1\r\n");
is $redis->get_message->{data}, undef, "nil bulk message";

$redis->parse("*-1\r\n");
is $redis->get_message->{data}, undef, "nil multi-bulk message";

done_testing;