From 6261f06d39e990b45f08b79edebe7b18a6eb9f01 Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erix.ericsson.se>
Date: Tue, 12 Oct 2010 10:37:22 +0200
Subject: Update megaco tests to conform with common_test standard

---
 lib/megaco/test/megaco_tcp_test.erl | 50 ++++++++++++++++---------------------
 1 file changed, 21 insertions(+), 29 deletions(-)

(limited to 'lib/megaco/test/megaco_tcp_test.erl')

diff --git a/lib/megaco/test/megaco_tcp_test.erl b/lib/megaco/test/megaco_tcp_test.erl
index 2348ebb882..1130d7a651 100644
--- a/lib/megaco/test/megaco_tcp_test.erl
+++ b/lib/megaco/test/megaco_tcp_test.erl
@@ -36,18 +36,18 @@
 %% External exports
 %%----------------------------------------------------------------------
 -export([
-	 all/1,
+	all/0,groups/0,init_per_group/2,end_per_group/2,
 
-	 start/1,
+	
 	 start_normal/1,
 	 start_invalid_opt/1,
 	 start_and_stop/1,
 
-	 sending/1,
+	
 	 sendreceive/1, 
 	 block_unblock/1, 
 
-	 errors/1,
+	
 	 socket_failure/1,
 	 accept_process/1,
 	 accept_supervisor/1,
@@ -121,34 +121,26 @@ end_per_testcase(Case, Config) ->
 %%======================================================================
 %% Test case definitions
 %%======================================================================
-all(suite) ->
-    [
-     start,
-     sending,
-     errors
-    ].
+all() -> 
+[{group, start}, {group, sending}, {group, errors}].
+
+groups() -> 
+    [{start, [],
+  [start_normal, start_invalid_opt, start_and_stop]},
+ {sending, [], [sendreceive, block_unblock]},
+ {errors, [],
+  [socket_failure, accept_process, accept_supervisor,
+   connection_supervisor, tcp_server]}].
+
+init_per_group(_GroupName, Config) ->
+	Config.
+
+end_per_group(_GroupName, Config) ->
+	Config.
+
 
-start(suite) ->
-    [
-     start_normal,
-     start_invalid_opt,
-     start_and_stop
-    ].
 
-sending(suite) ->
-    [
-     sendreceive,
-     block_unblock
-    ].
 
-errors(suite) ->
-    [
-     socket_failure,
-     accept_process,
-     accept_supervisor,
-     connection_supervisor,
-     tcp_server
-    ].
 
 
 %% ------------------ start ------------------------
-- 
cgit v1.2.3