diff options
| author | Hans Bolinder <[email protected]> | 2012-03-05 15:54:52 +0100 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2012-03-05 15:54:52 +0100 |
| commit | 16e8d2cb76183d022047c74a20aca014fb38140e (patch) | |
| tree | 9027cc2507f9b4f0277068be07c735e8f82f1f4f /lib/stdlib/src/digraph_utils.erl | |
| parent | 096ed7e301ce16dfb69709d7001ea3d5f370c202 (diff) | |
| parent | fbdf7929b87f3e41b0ff573b8eaae44cdfae16d9 (diff) | |
| download | otp-16e8d2cb76183d022047c74a20aca014fb38140e.tar.gz otp-16e8d2cb76183d022047c74a20aca014fb38140e.tar.bz2 otp-16e8d2cb76183d022047c74a20aca014fb38140e.zip | |
Merge branch 'hb/stdlib/digraph_condensation/OTP-9953' into maint
* hb/stdlib/digraph_condensation/OTP-9953:
Remove loops from the graph created by digraph_utils:condensation/1
Diffstat (limited to 'lib/stdlib/src/digraph_utils.erl')
| -rw-r--r-- | lib/stdlib/src/digraph_utils.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/stdlib/src/digraph_utils.erl b/lib/stdlib/src/digraph_utils.erl index e221be15a1..807b5c12a1 100644 --- a/lib/stdlib/src/digraph_utils.erl +++ b/lib/stdlib/src/digraph_utils.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1999-2011. All Rights Reserved. +%% Copyright Ericsson AB 1999-2012. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -370,5 +370,5 @@ condense('$end_of_table', _T, _SC, _G, _SCG, _I2C) -> condense(I, T, SC, G, SCG, I2C) -> [{_,C}] = ets:lookup(I2C, I), digraph:add_vertex(SCG, C), - digraph:add_edge(SCG, SC, C), + [digraph:add_edge(SCG, SC, C) || C =/= SC], condense(ets:next(T, I), T, SC, G, SCG, I2C). |