anchor.diff:    [];
   parse(Tokens) ->
     Clumps = clumper(Tokens),
  -  io:format("~p", [Clumps]),
  +  %io:format("~p", [Clumps]),
  +  erase(),   %% WARNING!!! Clobbers current process dictionary
     {[], {ChildRules, []}} = get_children([{}], Clumps),
     lists:sort(lists:map(fun format_rules/1, ChildRules)).
   
  
positive.code: get_children(_Parents, [{dedent,_} | T], {RuleAcc, AttAcc}) ->
    {T, {lists:sort(lists:flatten(RuleAcc)),
        lists:sort(lists:flatten(AttAcc))}};
  
  get_children(Parents, [{attr,Atts} | T], {RuleAcc, AttAcc}) ->
    {T2, NewAtts} = get_attributes(Atts, T),
  
negative.code:   clumper(T, Type, [Tok], [format_clump(LastType, CAcc) | Acc]).
  
  
  format_clump(assignment, Asmts) ->
    {assignment, lists:map(
      fun({_,_,A}) ->
        Str = string:sub_string(string:strip(A), 2, length(A) - 1),  % Remove brackets
        {Left,Right} = lists:split(string:chr(Str,$=), Str),
        {string:strip(string:sub_string(Left, 1, length(Left) - 1)), string:strip(Right)}
      end, Asmts)};
  format_clump(code, Codes) ->
    {code, lists:map(
      fun({_,_,A}) ->
        string:sub_string(string:strip(A),2,length(A) - 1)
      end, Codes)};
  format_clump(indent, _) ->
    {indent, none};
  format_clump(end_of_file, _) ->
  