anchor.diff:    [];
   get_forms_from_file_list(Module, Basedir, [H|T]) ->
     Filename = H ++ "/" ++ atom_to_list(Module) ++ ".erl",
  -  case file:read_file_info(Filename) of
  +  case read_file_info(Filename) of
       {ok, #file_info{type=regular}} ->
         epp:parse_file(Filename, [filename:dirname(Filename)], []);
       _ ->
  
positive.code:             end,
        case Res of
          ok ->
            code:purge(Module),
            case code:load_binary(Module, atom_to_list(Module) ++ ".erl", Bin) of
              {module, _Module} -> ok;
              Err               -> Err
            end;
  
negative.code: to_src(MetaMod, Filename) ->
    file:write_file(Filename, to_src(MetaMod)).
  
  %%% ===================================================== [ Internal functions ]
  
  -spec list_dir(Dir :: file:dirname()) -> Result when
      Result :: result([file:filename()], erl_prim_loader).
  list_dir(Dir) ->
    handle_list_dir(erl_prim_loader:list_dir(Dir)).
  
  handle_list_dir(error)           -> {error, erl_prim_loader};
  handle_list_dir({ok, Filenames}) -> {ok, Filenames}.
  
  -spec read_file_info(Filename :: file:filename()) -> Result when
      Result :: result(file:file_info(), file:posix() | badarg).
  read_file_info(Filename) ->
    erl_prim_loader:read_file_info(Filename).
  
  %%% ==================================================================== [ EOF ]
  