{
  my $packer = Packer->new;
  
  my $objects = [(object)(byte)Fn->BYTE_MIN];
  
  my $template = "c";
  
  my $binary = $packer->pack($template, $objects);
  
  eval { my $objects_again = $packer->unpack($template, $binary); }
  
  unless ($@) {
    return 0;
  }
}