Fix PULSE model bug of adding multiple same values to orddict

2014-02-20 23:09:57 +09:00 · 2014-02-20 23:09:57 +09:00 · 88d44722be
commit 88d44722be
parent 8ec5f04903
1 changed files with 9 additions and 3 deletions
--- a/prototype/corfurl/test/corfurl_pulse.erl
+++ b/prototype/corfurl/test/corfurl_pulse.erl
@ -381,7 +381,13 @@ check_trace(Trace0, _Cmds, _Seed) ->
                                    orddict:append(LPN, Pg, D);
                               ({mod_start, WType, LPN, _Pg}, D)
                                  when WType == w_ft; WType == w_tt ->
+                                    case lists:member(error_trimmed,
+                                                      orddict:fetch(LPN, D)) of
+                                        true ->
+                                            D;
+                                        false ->
                                            orddict:append(LPN, error_trimmed,D)
+                                    end
                            end, Dict1, [X || X={mod_start,_,_,_} <- StEnds]),
                  Dict3 = lists:foldl(
                            fun({mod_end, w_1, LPN, Pg}, D) ->