diff options
| author | Björn Gustavsson <[email protected]> | 2010-11-22 12:03:19 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2010-11-22 12:03:19 +0100 |
| commit | 4819bd39799777427965963625f034e30673b034 (patch) | |
| tree | 1d868d35eb94ebdd30c84c90df5baa7c14164fd4 /lib/hipe/icode/hipe_icode_callgraph.erl | |
| parent | f555bf55aabd9b80f48daaf1f8ae041c8aa06f9e (diff) | |
| parent | 6083a1a9e553eac8a0b33697964fadfd17d302ca (diff) | |
| download | otp-4819bd39799777427965963625f034e30673b034.tar.gz otp-4819bd39799777427965963625f034e30673b034.tar.bz2 otp-4819bd39799777427965963625f034e30673b034.zip | |
Merge branch 'ks/hipe-patches' into dev
* ks/hipe-patches:
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]. %%------------------------------------------------------------------------ |