anchor.diff:  
   encode_field_tag(Code, FieldType)
           when is_integer(Code) andalso (Code band 16#3fffffff =:= Code) ->
  -    encode_varint((Code bsl 3) bor FieldType);
  +    encode_varint_value((Code bsl 3) bor FieldType);
   
   encode_field_tag('undefined', FieldType) ->
       % 1 is the default code for top-level primitive types
  
positive.code:             'undefined' -> []; % do not generate record header
              _ ->
                  [ encode_field_tag(Code, ?TYPE_STRING),
                    encode_varint(iolist_size(Fields)) ]
          end,
      [ Header, Fields ].
  
  
negative.code:     Integer :: non_neg_integer()) -> iolist().
  
  encode_varint_field(Code, Integer) ->
      [
          encode_field_tag(Code, ?TYPE_VARINT),
          encode_varint_value(Integer)
      ].
  
  
  %% @hidden
  %% NOTE: `I` MUST be >= 0
  -spec encode_varint_value/1 :: (
      I :: non_neg_integer()) -> binary().
  
  encode_varint_value(I) ->
      encode_varint(I, []).
  
  
  