anchor.diff:  
   filter_forms(Msgs, [{function,L,encode_pikachu,1,[Clause]}|Tail], Basename, Acc) ->
       Functions = [begin
  -        {function,L,list_to_atom("encode_" ++ string:to_lower(Name)),1,[replace_atom(Clause, pikachu, atomize(Name))]} 
  +        {function,L,list_to_atom("encode_" ++ string:to_lower(Name)),1,[replace_atom(Clause, pikachu, atomize(Name))]}
       end || {Name, _} <- Msgs],
       filter_forms(Msgs, Tail, Basename, Functions ++ Acc);
   
  
positive.code: 
  filter_forms(Msgs, [{function,L,iolist,2,[Clause]}|Tail], Basename, Acc) ->
      filter_forms(Msgs, Tail, Basename, [expand_iolist_function(Msgs, L, Clause)|Acc]);
          
  filter_forms(Msgs, [{function,L,decode_pikachu,1,[Clause]}|Tail], Basename, Acc) ->
      Functions = [begin
          {function,L,list_to_atom("decode_" ++ string:to_lower(Name)),1,[replace_atom(Clause, pikachu, atomize(Name))]} 
      end || {Name, _} <- Msgs],
      filter_forms(Msgs, Tail, Basename, Functions ++ Acc);
      
  filter_forms(Msgs, [{function,L,decode,2,[Clause]}|Tail], Basename, Acc) ->
      filter_forms(Msgs, Tail, Basename, [expand_decode_function(Msgs, L, Clause)|Acc]);
      
  filter_forms(Msgs, [{function,L,to_record,2,[Clause]}|Tail], Basename, Acc) ->
      filter_forms(Msgs, Tail, Basename, [expand_to_record_function(Msgs, L, Clause)|Acc]);
  
  
negative.code: %% Copyright (c) 2009
  %% Nick Gerakines <nick@gerakines.net>
  %% Jacob Vorreuter <jacob.vorreuter@gmail.com>
  %%
  