anchor.diff:  	"\r\n"
   	"...contents of file2.gif...\r\n"
   	"--BbC04y--\r\n"
  -	"--AaB03x--\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.
   %%
  
positive.code: 			<< _:Start2/binary, Stream2/bits >> = Stream,
  			case Stream2 of
  				%% Last boundary. Return the epilogue.
  				<< "--\r\n", Stream3/bits >> ->
  					{done, Stream3};
  				_ ->
  					case binary:match(Stream, <<"\r\n\r\n">>) of
  
negative.code: 	"\r\n"
  	"PGh0bWw+CiAgPGhlYWQ+CiAgPC9oZWFkPgogIDxib2R5PgogICAgPHA+VGhpcyBpcyB0aGUg\r\n"
  	"Ym9keSBvZiB0aGUgbWVzc2FnZS48L3A+CiAgPC9ib2R5Pgo8L2h0bWw+Cg==\r\n"
  	"--frontier--"
  >>).
  -define(TEST1_BOUNDARY, <<"frontier">>).
  
  