aboutsummaryrefslogtreecommitdiffstats
path: root/lib/stdlib/src/digraph_utils.erl
diff options
context:
space:
mode:
authorHans Bolinder <[email protected]>2012-03-05 15:54:52 +0100
committerHans Bolinder <[email protected]>2012-03-05 15:54:52 +0100
commit16e8d2cb76183d022047c74a20aca014fb38140e (patch)
tree9027cc2507f9b4f0277068be07c735e8f82f1f4f /lib/stdlib/src/digraph_utils.erl
parent096ed7e301ce16dfb69709d7001ea3d5f370c202 (diff)
parentfbdf7929b87f3e41b0ff573b8eaae44cdfae16d9 (diff)
downloadotp-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.erl4
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).