anchor.diff:              ok
       end.
   
  -store_erlcinfo(_G, _Modified = false, _InclDirs) ->
  -    ok;
  -store_erlcinfo(G, _Modified, InclDirs) ->
  +store_erlcinfo(G, InclDirs) ->
       Vs = lists:map(
              fun(V) ->
                      digraph:vertex(G, V)
  
positive.code:             ok = file:delete(erlcinfo_file())
      end,
      Dirs = source_and_include_dirs(InclDirs, Erls),
      Updates = [update_erlcinfo(G, Erl, Dirs) || Erl <- Erls],
      Modified = lists:member(modified, Updates),
      ok = store_erlcinfo(G, Modified, InclDirs),
      G.
  
  source_and_include_dirs(InclDirs, Erls) ->
      SourceDirs = lists:map(fun filename:dirname/1, Erls),
      lists:usort(["include" | InclDirs ++ SourceDirs]).
  
  update_erlcinfo(G, Source, Dirs) ->
      case digraph:vertex(G, Source) of
          {_, LastUpdated} ->
              case filelib:last_modified(Source) of
  
negative.code:     digraph:add_vertex(G, Source, LastUpdated),
      lists:foreach(
        fun(Incl) ->
                update_erlcinfo(G, Dirs, Incl),
                digraph:add_edge(G, Source, Incl)
        end, AbsIncls),
      modified.
  
  restore_erlcinfo(G, InclDirs) ->
      case file:read_file(erlcinfo_file()) of
  