anchor.diff:              output = Output},
           FileDescriptor) ->
       DescriptionAttr = case Description of
  -			  <<>> -> [];
   			  [] -> [];
   			  _ -> [<<" description=\"">>, escape_attr(Description), <<"\"">>]
   		      end,
  
positive.code: 	{
  	  name :: chars(),
  	  description :: chars(),
  	  result :: ok | {failed, tuple()} | {aborted, tuple()} | {skipped, tuple()},
  	  time :: integer(),
  	  output :: binary()
  	 }).
  
negative.code: %% Empty output is simply the empty string.
  %% Other output is inside a <system-out> xml tag.
  %% ----------------------------------------------------------------------------
  format_testcase_output(Output) ->
      [?INDENT, ?INDENT, <<"<system-out>">>, escape_text(Output), ?NEWLINE, ?INDENT, ?INDENT, <<"</system-out>">>, ?NEWLINE].
  
  