anchor.diff:  -record(buf, {bytes = <<>> :: binary(),
                 waiting_for = unknown :: 'unknown' | non_neg_integer()}).
   
  +-opaque parse_buffer() :: #buf{}.
  +-type syslog_message() :: {msg, binary()} | {malformed, binary()}.
  +-type syslog_messages() :: [syslog_message()].
  +
   %% Syslog frames
   %% a) <Length as ascii integer><space><msg:Length>"
   %% b) <msg>\n.
  
positive.code: 
  %% Idx 0 must be 1-9.
  %% Finds the ascii encoded integer terminated by a space.
  find_int(Buf, Idx) when byte_size(Buf) =< Idx ->
      incomplete;
  find_int(Buf, Idx) ->
  
negative.code:     parse_recursive(Bytes, []).
  
  
  -spec parse_recursive(binary(), Acc::syslog_messages()) ->
                               {'ok' | {'error', term()},
                                syslog_messages(), parse_buffer()}.
  parse_recursive(<<>>, Acc) ->
      {ok, lists:reverse(Acc), #buf{}};
  parse_recursive(Buf, Acc) ->
  