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: 	"\r\n"
  	"...contents of file2.gif...\r\n"
  	"--BbC04y--\r\n"
  	"--AaB03x--"
  >>).
  -define(TEST2_BOUNDARY, <<"AaB03x">>).
  
  -define(TEST3_MIME, <<
  	"This is the preamble.\r\n"
  	"--boundary\r\n"
  	"Content-Type: text/plain\r\n"
  	"\r\n"
  	"This is the body of the message.\r\n"
  	"--boundary--"
  	"\r\nThis is the epilogue. Here it includes leading CRLF"
  >>).
  -define(TEST3_BOUNDARY, <<"boundary">>).
  
  -define(TEST4_MIME, <<
  	"This is the preamble.\r\n"
  	"--boundary\r\n"
  	"Content-Type: text/plain\r\n"
  	"\r\n"
  	"This is the body of the message.\r\n"
  	"--boundary--"
  	"\r\n"
  >>).
  -define(TEST4_BOUNDARY, <<"boundary">>).
  
  %% Parsing.
  %%
  