Help language development. Donate to The Perl Foundation

MsgPack cpan:AZAWAWI last updated on 2017-11-08

t/201-unpack-bool.t
use v6;

use Test;
use MsgPack;

plan 4;

nok MsgPack::unpack( Blob.new( 0xc2 ) ), "Boolean False is unpacked correctly";
ok MsgPack::unpack( Blob.new( 0xc2 ) ) ~~ Bool, "Boolean False is unpacked correctly";
ok MsgPack::unpack( Blob.new( 0xc3 ) ), "Boolean True is unpacked correctly";
ok MsgPack::unpack( Blob.new( 0xc3 ) ) ~~ Bool, "Boolean False is unpacked correctly";