aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/test/old_mod.erl
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2017-04-19 12:54:56 +0200
committerBjörn Gustavsson <[email protected]>2017-04-20 12:00:55 +0200
commit8121b6af55ba485fe58a9dbfb0f1180393b86a3f (patch)
tree6559f9306f1ff221c7444469350be02f8b3676a4 /erts/emulator/test/old_mod.erl
parent0326b22639d0c8c5f915aed34ad3e099e4ee4642 (diff)
downloadotp-8121b6af55ba485fe58a9dbfb0f1180393b86a3f.tar.gz
otp-8121b6af55ba485fe58a9dbfb0f1180393b86a3f.tar.bz2
otp-8121b6af55ba485fe58a9dbfb0f1180393b86a3f.zip
Remove test case for testing compatibility with R9B
It is no longer possible to commuicate with R9B nodes.
Diffstat (limited to 'erts/emulator/test/old_mod.erl')
-rw-r--r--erts/emulator/test/old_mod.erl48
1 files changed, 0 insertions, 48 deletions
diff --git a/erts/emulator/test/old_mod.erl b/erts/emulator/test/old_mod.erl
deleted file mode 100644
index 866aba79bb..0000000000
--- a/erts/emulator/test/old_mod.erl
+++ /dev/null
@@ -1,48 +0,0 @@
-%%
-%% %CopyrightBegin%
-%%
-%% Copyright Ericsson AB 2003-2016. All Rights Reserved.
-%%
-%% Licensed under the Apache License, Version 2.0 (the "License");
-%% you may not use this file except in compliance with the License.
-%% You may obtain a copy of the License at
-%%
-%% http://www.apache.org/licenses/LICENSE-2.0
-%%
-%% Unless required by applicable law or agreed to in writing, software
-%% distributed under the License is distributed on an "AS IS" BASIS,
-%% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-%% See the License for the specific language governing permissions and
-%% limitations under the License.
-%%
-%% %CopyrightEnd%
-%%
-
--module(old_mod).
--compile(r10).
-
--export([sort_on_old_node/1, sorter/3]).
-
--include_lib("common_test/include/ct.hrl").
-
-sorter(Receiver, Ref, List) ->
- Receiver ! {Ref, lists:sort(List)}.
-
-sort_on_old_node(List) when is_list(List) ->
- OldVersion = "r10",
- Pa = filename:dirname(code:which(?MODULE)),
- {X, Y, Z} = now(),
- NodeName = list_to_atom(OldVersion
- ++ "_"
- ++ integer_to_list(X)
- ++ integer_to_list(Y)
- ++ integer_to_list(Z)),
- {ok, Node} = test_server:start_node(NodeName,
- peer,
- [{args, " -pa " ++ Pa},
- {erl, [{release, OldVersion++"b_patched"}]}]),
- Ref = make_ref(),
- spawn_link(Node, ?MODULE, sorter, [self(), Ref, List]),
- SortedPids = receive {Ref, SP} -> SP end,
- true = test_server:stop_node(Node),
- SortedPids.