anchor.diff:      invalid.
   
   scan_header(Bin) ->
  -    case get_crlf_crlf_pos(Bin, 0) of
  +    case get_crlf_crlf_pos(Bin) of
           {yes, Pos} ->
               {Headers, <<_:4/binary, Body/binary>>} = split_binary(Bin, Pos),
               {yes, Headers, Body};
  
positive.code:     Bin1_already_scanned_size = size(Bin1) - 4,
      <<Headers_prefix:Bin1_already_scanned_size/binary, Rest/binary>> = Bin1,
      Bin_to_scan = <<Rest/binary, Bin2/binary>>,
      case get_crlf_crlf_pos(Bin_to_scan, 0) of
          {yes, Pos} ->
              {Headers_suffix, <<_:4/binary, Body/binary>>} = split_binary(Bin_to_scan, Pos),
              {yes, <<Headers_prefix/binary, Headers_suffix/binary>>, Body};
  
negative.code:             {no, list_to_binary([Bin1, Bin2])}
      end.
  
  get_crlf_pos(Data) ->
      binary_bif_match(Data, <<$\r, $\n>>).
  
  
  fmt_val(L) when is_list(L)    -> L;
  fmt_val(I) when is_integer(I) -> integer_to_list(I);
  