anchor.diff:      Acc2 = Acc + (M bsl Shift),
       case (N band 16#80) =:= 0 of
           true ->
  -            {Acc2, Rest};
  +            {ok, {Acc2, Rest}};
           false ->
               decode_integer_acc(Rest, Prefix, Shift + 7, Acc2)
       end;
  
positive.code: 
  test_int() ->
      Bin1337 = encode_integer(1337, 5, 0),
      {1337, <<>>} = decode_integer(Bin1337, 5),
      Bin42 = encode_integer(42, 8, 0),
      {42, <<>>} = decode_integer(Bin42, 8),
      BinInt64Max = encode_integer(1 bsl 64, 7, 128),
      {1 bsl 64, <<"garbage">>} =
          decode_integer(<<BinInt64Max/binary, "garbage">>, 7).
  
  test_encode() ->
  
negative.code:     case decode_integer(Bin, 7) of
          {error, Why} ->
              {error, Why};
          {ok, {N, Rest}} ->
              case header:get(N, Context) of
                  error ->
                      {error, outofindex};
  