anchor.diff:  
   %%%--Div-----------------------------------------------------------------
   
  -reverse(List) ->
  -    reverse(List,[]).
  -reverse([H|T],Acc) ->
  -    reverse(T,[H|Acc]);
  -reverse([],Acc) ->
  -    Acc.
  -
  -
   escape_lt_and_gt(Rawline,HTML) when HTML =/= true ->
       Rawline;
   escape_lt_and_gt(Rawline,_HTML) ->
  
positive.code: 			   MClauses])
      end;
  munge_clauses([], Vars, Lines, MungedClauses) -> 
      {reverse(MungedClauses), Vars#vars{lines = Lines}}.
  
  munge_body(Expr, Vars) ->
      munge_body(Expr, Vars, [], []).
  
negative.code: merge_clauses([{{M,F,A,_C},R}|Clauses], MFun, Result) ->
      merge_clauses(Clauses, MFun, [{{M,F,A},R}|Result]);
  merge_clauses([], _Fun, Result) ->
      lists:reverse(Result).
  
  merge_functions([{_MFA,R}|Functions], MFun) ->
      merge_functions(Functions, MFun, R);
  