anchor.diff:  			<< _:Start2/binary, Stream2/bits >> = Stream,
   			case Stream2 of
   				%% Last boundary. Return the epilogue.
  -				<< "--\r\n", Stream3/bits >> ->
  +				<< "--", Stream3/bits >> ->
   					{done, Stream3};
   				_ ->
   					case binary:match(Stream, <<"\r\n\r\n">>) of
  
positive.code: 
  -spec close(binary()) -> iodata().
  close(Boundary) ->
  	[<<"\r\n--">>, Boundary, <<"--\r\n">>].
  
  -ifdef(TEST).
  build_test() ->
  
negative.code: 	{done, <<>>} = parse_headers(Rest4, ?TEST2_BOUNDARY),
  	ok.
  
  parse_epilogue_test() ->
  	H1 = [{<<"content-type">>, <<"text/plain">>}],
  	Body1 = <<"This is the body of the message.">>,
  	Epilogue = <<"\r\nThis is the epilogue. Here it includes leading CRLF">>,
  	{ok, H1, Rest} = parse_headers(?TEST3_MIME, ?TEST3_BOUNDARY),
  	{done, Body1, Rest2} = parse_body(Rest, ?TEST3_BOUNDARY),
  	done = parse_body(Rest2, ?TEST3_BOUNDARY),
  	{done, Epilogue} = parse_headers(Rest2, ?TEST3_BOUNDARY),
  	ok.
  
  parse_epilogue_crlf_test() ->
  	H1 = [{<<"content-type">>, <<"text/plain">>}],
  	Body1 = <<"This is the body of the message.">>,
  	Epilogue = <<"\r\n">>,
  	{ok, H1, Rest} = parse_headers(?TEST4_MIME, ?TEST4_BOUNDARY),
  	{done, Body1, Rest2} = parse_body(Rest, ?TEST4_BOUNDARY),
  	done = parse_body(Rest2, ?TEST4_BOUNDARY),
  	{done, Epilogue} = parse_headers(Rest2, ?TEST4_BOUNDARY),
  	ok.
  
  parse_partial_test() ->
  	{ok, <<0:8000, "abcdef">>, <<"\rghij">>}
  		= parse_body(<<0:8000, "abcdef\rghij">>, <<"boundary">>),
  