anchor.diff:    end.
   
   get_dirs_in_dir(Dir) ->
  -  case file:list_dir(Dir) of
  +  case list_dir(Dir) of
       {error, _} ->
         undefined;
       {ok, Listing} ->
         lists:foldl(
           fun (Name, Acc) ->
               Path = Dir ++ "/" ++ Name,
  -            case file:read_file_info(Path) of
  +            case read_file_info(Path) of
                 {ok, #file_info{type=directory}} -> [Path | Acc];
                 _ -> Acc
               end
  
positive.code: to_src(MetaMod, Filename) ->
    file:write_file(Filename, to_src(MetaMod)).
  
  %%% ==================================================================== [ EOF ]
  
negative.code:             end,
        case Res of
          ok ->
            Filename = case code:which(Module) of
                         non_existing ->
                           atom_to_list(Module) ++ ".erl";
                         Path ->
                           Path
                       end,
            code:purge(Module),
            case code:load_binary(Module, Filename, Bin) of
              {module, _Module} -> ok;
              Err               -> Err
            end;
  