aboutsummaryrefslogtreecommitdiffstats
path: root/lib/asn1/test/test_special_decode_performance.erl
diff options
context:
space:
mode:
authorAdam Lindberg <[email protected]>2012-02-06 11:57:35 +0100
committerAdam Lindberg <[email protected]>2012-02-28 14:59:32 +0100
commit659fcc5ebd03b72a4081bf0853538800ddf16f86 (patch)
tree4353be135a4cd2e718d5a918cf3e06cd5c925743 /lib/asn1/test/test_special_decode_performance.erl
parentaa4e27ebac9eb287069fab859fe5dcdab82c75bf (diff)
downloadotp-659fcc5ebd03b72a4081bf0853538800ddf16f86.tar.gz
otp-659fcc5ebd03b72a4081bf0853538800ddf16f86.tar.bz2
otp-659fcc5ebd03b72a4081bf0853538800ddf16f86.zip
[asn1] Parallelize test suites
Diffstat (limited to 'lib/asn1/test/test_special_decode_performance.erl')
-rw-r--r--lib/asn1/test/test_special_decode_performance.erl19
1 files changed, 2 insertions, 17 deletions
diff --git a/lib/asn1/test/test_special_decode_performance.erl b/lib/asn1/test/test_special_decode_performance.erl
index 60a95a3675..4ac0ff2b27 100644
--- a/lib/asn1/test/test_special_decode_performance.erl
+++ b/lib/asn1/test/test_special_decode_performance.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2003-2010. All Rights Reserved.
+%% Copyright Ericsson AB 2003-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
@@ -19,25 +19,10 @@
%%
-module(test_special_decode_performance).
--export([compile/2,go/1,loop2/4,loop1/5]).
+-export([go/1,loop2/4,loop1/5]).
-include_lib("test_server/include/test_server.hrl").
-
-compile(Config,Rule) when Rule==ber_bin_v2 ->
- ?line DataDir = ?config(data_dir,Config),
- ?line OutDir = ?config(priv_dir,Config),
- ?line true = code:add_patha(?config(priv_dir,Config)),
-
- ?line asn1ct:compile(DataDir++"MEDIA-GATEWAY-CONTROL",
- [ber_bin,optimize,asn1config,{outdir,OutDir},
- {i,DataDir}]),
- ?line asn1ct:compile(DataDir++"PartialDecSeq",
- [ber_bin,optimize,asn1config,{outdir,OutDir},
- {i,DataDir}]);
-compile(_,Rule) ->
- {skip,lists:concat(["not implemented yet for version: ",Rule])}.
-
go(all) ->
{Time_S_s,Time_S_e,Time_S_c}=go(10000,'PartialDecSeq'),
{Time_MGC_s,Time_MGC_e,Time_MGC_c}=go(10000,'MEDIA-GATEWAY-CONTROL'),