Skip to content
This repository has been archived by the owner on Jun 4, 2019. It is now read-only.

Commit

Permalink
* lang_c/analyze/graph_code_c.ml: print
Browse files Browse the repository at this point in the history
  • Loading branch information
pad committed Sep 25, 2012
1 parent 5f97404 commit 2ff1fe1
Showing 1 changed file with 3 additions and 0 deletions.
3 changes: 3 additions & 0 deletions lang_c/analyze/graph_code_c.ml
Expand Up @@ -173,6 +173,9 @@ let rec add_use_edge env (name, kind) =
then raise Impossible
else G.not_found
in
pr2 (spf "PB: lookup fail on %s (in %s)"
(G.string_of_node dst) (G.string_of_node src));

env.g +> G.add_edge (parent_target, dst) G.Has;
env.g +> G.add_edge (src, dst) G.Use;
env.lookup_fails#update dst Common.add1
Expand Down

0 comments on commit 2ff1fe1

Please sign in to comment.