anchor.diff:  ordinal(3) -> fmt("~!B3~!!rd");
   ordinal(N) when is_integer(N) -> fmt("~!B~w~!!th", [N]).
   
  -
  +%% Format a pattern ad highlight errorous part in red.
   bad_pat("pattern " ++ P) ->
       fmt("pattern ~!r~s",[P]);
   bad_pat("variable " ++ P) ->
  
positive.code: -module(rebar_dialyzer_format).
  
  -include("rebar.hrl").
  
  -export([format_warnings/1]).
  
  format_warnings(Warnings) ->
      {_, Res} = lists:foldl(fun format_warning_/2, {undefined, []}, Warnings),
      lists:reverse(Res).
  
  
  format_warning_(Warning = {_Tag, {File, Line}, Msg}, {File, Acc}) ->
      try
          String = message_to_string(Msg),
  
negative.code:             {File, [dialyzer:format_warning(Warning, fullpath) | Acc]}
      end;
  
  %% With a new file detencted we also write a file header.
  format_warning_(Warning = {_Tag, {File, Line}, Msg}, {_LastFile, Acc}) ->
      try
          Base = filename:basename(File),
  