anchor.diff:      reltool_utils:write_file(TargetFile, BeamBin2).
   
   cleanup_spec(List, TargetDir) when is_list(List) ->
  -    lists:foreach(fun(F)-> cleanup_spec(F, TargetDir) end, List);
  +    lists:foreach(fun(F) -> cleanup_spec(F, TargetDir) end, List);
   %% cleanup_spec({source_dir, _SourceDir, Spec}, TargetDir) ->
   %%     cleanup_spec(Spec, TargetDir);
   cleanup_spec({create_dir, Dir, Files}, TargetDir) ->
  
positive.code: 
  subst_var([$%| Rest], Vars, Result, VarAcc) ->
      Key = lists:reverse(VarAcc),
      case lists:keysearch(Key, 1, Vars) of
          {value, {Key, Value}} ->
              subst(Rest, Vars, lists:reverse(Value, Result));
          false ->
              subst(Rest, Vars, [$% | VarAcc ++ [$% | Result]])
  
negative.code: 		 Visited,
  		 [],
  		 []),
      Missing1 = NotFnd1 ++ NotFnd2 ++ Missing,
      case Uses ++ Incs of
          [] ->
  