anchor.diff:      {ok, Header, Body, Data1}.
   
   header_fetch(Code, Header) ->
  -    {ok, Field} = header_find(Code, Header).
  +    {ok, Field} = header_find(Code, Header),
  +    Field.
   
   header_find(Code, Header) ->
       Headers = Header#header.headers,
  
positive.code:     unmarshal_array(SubType, Length - Size, Data1, Res ++ [Value], Pos1).
  
  unmarshal_list(Types, Data) when is_list(Types), is_binary(Data) ->
      {ok, Data1, Res, Pos} = unmarshal_list(Types, Data, [], 0),
      {ok, Data1, Res, Pos}.
  
  unmarshal_list(Types, Data, Pos) when is_list(Types) ->
  
negative.code: -include("dbus.hrl").
  
  
  %% api
  -export([
  	 marshal_message/1,
  	 marshal_message/2,
  	 marshal_list/2,
  	 unmarshal_data/1,
  	 unmarshal_signature/1
  	]).
  
  -export([test/0]).
  
  test() ->
      Data = read_test(),
      unmarshal_list([byte, byte, byte, byte, uint32, uint32, {array, {struct, [byte, variant]}}], Data).
  
  read_test() ->
      {ok, File} = file:open("/tmp/bytes", [binary, read]),
  