anchor.diff:  	    << 16#DB:8, Len:32/big-unsigned-integer-unit:1, Bin/binary >>
       end.
   
  -% list / tuple
  +% list
   pack_array(L) ->
       case length(L) of
    	Len when Len < 16 ->
  
positive.code:     1+test_(Rest).
  
  other_test()->
      {more,1}=msgpack:unpack(<<>>).
  
  -endif.
  
negative.code:     {Term, <<>>}=msgpack:unpack(OrigBin);
  test_p(I,_,OrigBin,Len) when I < Len->
      <<Bin:I/binary, _/binary>> = OrigBin,
      ?assertEqual({more, undefined}, msgpack:unpack(Bin)).
  
  partial_test()-> % error handling test.
      Term = lists:seq(0, 45),
  