anchor.diff:          io:format(Output, "~s~s:~n", [Header, Suffix]),
           separator(Output, $-),
           lists:foreach(ForeachInner, Messages),
  +        io:format(Output, "~n", []),
           separator(Output, $#)
       end,
     lists:foreach(Foreach, LogMsgs).
  
positive.code: tag_to_filename(standard_error) -> "Standard Error";
  tag_to_filename(race) ->
    separator_string($-) ++
      "\nPairs of racing instructions";
  tag_to_filename(Filename) when is_list(Filename) ->
    io_lib:format("Text printed to ~s", [Filename]).
  
  
negative.code:   lists:duplicate(80, Char).
  
  separator(Output, Char) ->
    io:format(Output, "~s~n~n", [separator_string(Char)]).
  
  print_streams(Streams, Output) ->
    Fold =
  