diff options
author | Kostis Sagonas <[email protected]> | 2010-11-09 14:47:30 +0200 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2010-11-22 12:01:26 +0100 |
commit | 6083a1a9e553eac8a0b33697964fadfd17d302ca (patch) | |
tree | aa8ba675e51982c4328c9605d25aaa65fe08bbb6 /lib/hipe/icode/hipe_icode_callgraph.erl | |
parent | 76378bb4a1a89d08b41d6f3df0edc6c26160bef7 (diff) | |
download | otp-6083a1a9e553eac8a0b33697964fadfd17d302ca.tar.gz otp-6083a1a9e553eac8a0b33697964fadfd17d302ca.tar.bz2 otp-6083a1a9e553eac8a0b33697964fadfd17d302ca.zip |
hipe: Update types and specs
Diffstat (limited to 'lib/hipe/icode/hipe_icode_callgraph.erl')
-rw-r--r-- | lib/hipe/icode/hipe_icode_callgraph.erl | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lib/hipe/icode/hipe_icode_callgraph.erl b/lib/hipe/icode/hipe_icode_callgraph.erl index 95182fc002..3dba8e1071 100644 --- a/lib/hipe/icode/hipe_icode_callgraph.erl +++ b/lib/hipe/icode/hipe_icode_callgraph.erl @@ -25,8 +25,6 @@ %% in hipe_icode_type.erl. %% %% Created : 7 Jun 2004 by Tobias Lindahl <[email protected]> -%% -%% $Id$ %%----------------------------------------------------------------------- -module(hipe_icode_callgraph). @@ -48,7 +46,7 @@ -type mfa_icode() :: {mfa(), #icode{}}. --record(icode_callgraph, {codedict :: dict(), ordered_sccs :: [[atom()]]}). +-record(icode_callgraph, {codedict :: dict(), ordered_sccs :: [[mfa()]]}). %%------------------------------------------------------------------------ %% Exported functions @@ -78,7 +76,7 @@ construct_callgraph(List) -> to_list(#icode_callgraph{codedict = Dict, ordered_sccs = SCCs}) -> FlatList = lists:flatten(SCCs), - [{Mod, dict:fetch(Mod, Dict)} || Mod <- FlatList]. + [{MFA, dict:fetch(MFA, Dict)} || MFA <- FlatList]. %%------------------------------------------------------------------------ |