From cfda2e2834bcb766d8f85777ac61e7cc25e25f4d Mon Sep 17 00:00:00 2001
From: Anders Svensson <anders@erlang.org>
Date: Mon, 19 Sep 2011 12:30:41 +0200
Subject: Use groups for parallel testcase execution

---
 lib/diameter/test/diameter_dict_SUITE.erl | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'lib/diameter/test/diameter_dict_SUITE.erl')

diff --git a/lib/diameter/test/diameter_dict_SUITE.erl b/lib/diameter/test/diameter_dict_SUITE.erl
index 3db9907074..170b3c1695 100644
--- a/lib/diameter/test/diameter_dict_SUITE.erl
+++ b/lib/diameter/test/diameter_dict_SUITE.erl
@@ -24,11 +24,11 @@
 -module(diameter_dict_SUITE).
 
 -export([suite/0,
-         all/0]).
+         all/0,
+         groups/0]).
 
 %% testcases
--export([scramble/1,
-         append/1,
+-export([append/1,
          fetch/1,
          fetch_keys/1,
          filter/1,
@@ -51,7 +51,10 @@ suite() ->
     [{timetrap, {seconds, 10}}].
 
 all() ->
-    [scramble | tc()].
+    [{group, all} | tc()].
+
+groups() ->
+    [{all, [parallel], tc()}].
 
 tc() ->
     [append,
@@ -68,9 +71,6 @@ tc() ->
 
 %% ===========================================================================
 
-scramble(Config) ->
-    [] = ?util:run(?util:scramble([{?MODULE, [F, Config]} || F <- tc()])).
-
 -define(KV100, [{N,[N]} || N <- lists:seq(1,100)]).
 
 append(_) ->
-- 
cgit v1.2.3