File 0112-remove-erts-emulator-test-hipe_SUITE_data-leftovers.patch of Package erlang
From 9d879cebd7936c7584bed1d203fdbbeb8f7cc8cc Mon Sep 17 00:00:00 2001
From: Ilya Klyuchnikov <ilya.klyuchnikov@gmail.com>
Date: Mon, 20 Dec 2021 11:03:21 +0000
Subject: [PATCH] remove erts/emulator/test/hipe_SUITE_data leftovers
---
.../test/hipe_SUITE_data/literals.erl | 26 --------
.../test/hipe_SUITE_data/ref_cell.erl | 64 -------------------
.../test/hipe_SUITE_data/trycatch_1.erl | 13 ----
.../test/hipe_SUITE_data/trycatch_2.erl | 10 ---
.../test/hipe_SUITE_data/trycatch_3.erl | 9 ---
5 files changed, 122 deletions(-)
delete mode 100644 erts/emulator/test/hipe_SUITE_data/literals.erl
delete mode 100644 erts/emulator/test/hipe_SUITE_data/ref_cell.erl
delete mode 100644 erts/emulator/test/hipe_SUITE_data/trycatch_1.erl
delete mode 100644 erts/emulator/test/hipe_SUITE_data/trycatch_2.erl
delete mode 100644 erts/emulator/test/hipe_SUITE_data/trycatch_3.erl
diff --git a/erts/emulator/test/hipe_SUITE_data/literals.erl b/erts/emulator/test/hipe_SUITE_data/literals.erl
deleted file mode 100644
index 31e443970f..0000000000
--- a/erts/emulator/test/hipe_SUITE_data/literals.erl
+++ /dev/null
@@ -1,26 +0,0 @@
-%%
-%% %CopyrightBegin%
-%%
-%% Copyright Ericsson AB 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(literals).
-
--export([a/0, b/0]).
-
-a() -> [a,b,c].
-b() -> {a,b,c}.
diff --git a/erts/emulator/test/hipe_SUITE_data/ref_cell.erl b/erts/emulator/test/hipe_SUITE_data/ref_cell.erl
deleted file mode 100644
index 2654e4077b..0000000000
--- a/erts/emulator/test/hipe_SUITE_data/ref_cell.erl
+++ /dev/null
@@ -1,64 +0,0 @@
-%%
-%% %CopyrightBegin%
-%%
-%% Copyright Ericsson AB 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(ref_cell).
-
--export([start_link/0, start_link_deep/0, call/2]).
-
--compile(native).
-
--define(DEPTH, 100).
--define(ALLOCS, 500).
-
-start_link() ->
- spawn_link(fun() -> loop(undefined) end).
-
-start_link_deep() ->
- spawn_link(fun() -> go_deep(?DEPTH) end).
-
-%% Create a stack large enough to get a graylimit trap placed next time there's
-%% a minor gc.
-go_deep(0) ->
- alloc_some(?ALLOCS),
- loop(undefined),
- 0;
-go_deep(Depth) ->
- go_deep(Depth-1)+1.
-
-%% Do some allocation to trigger a minor gc
-alloc_some(Amount) ->
- Check = (Amount * (Amount + 1)) div 2,
- Check = lists:sum(lists:seq(1, Amount)).
-
-call(Pid, Call) ->
- Pid ! {Call, self()},
- receive {Pid, Res} -> Res end.
-
-loop(Thing) ->
- receive
- {done, Pid} -> Pid ! {self(), done};
- {{put_res_of, Fun}, Pid} ->
- NewThing = Fun(),
- Pid ! {self(), put},
- loop(NewThing);
- {get, Pid} ->
- Pid ! {self(), Thing},
- loop(Thing)
- end.
diff --git a/erts/emulator/test/hipe_SUITE_data/trycatch_1.erl b/erts/emulator/test/hipe_SUITE_data/trycatch_1.erl
deleted file mode 100644
index f7d0e3bd1e..0000000000
--- a/erts/emulator/test/hipe_SUITE_data/trycatch_1.erl
+++ /dev/null
@@ -1,13 +0,0 @@
--module(trycatch_1).
--export([one_try_catch/1,one_plain_catch/1]).
-
-one_try_catch(Term) ->
- try
- trycatch_2:two(Term)
- catch
- C:R:Stk ->
- {C,R,Stk}
- end.
-
-one_plain_catch(Term) ->
- catch trycatch_2:two(Term).
diff --git a/erts/emulator/test/hipe_SUITE_data/trycatch_2.erl b/erts/emulator/test/hipe_SUITE_data/trycatch_2.erl
deleted file mode 100644
index ffac420197..0000000000
--- a/erts/emulator/test/hipe_SUITE_data/trycatch_2.erl
+++ /dev/null
@@ -1,10 +0,0 @@
--module(trycatch_2).
--export([two/1]).
-
-two(Term) ->
- Res = trycatch_3:three(Term),
- foo(),
- Res.
-
-foo() ->
- ok.
diff --git a/erts/emulator/test/hipe_SUITE_data/trycatch_3.erl b/erts/emulator/test/hipe_SUITE_data/trycatch_3.erl
deleted file mode 100644
index 578fa0e87e..0000000000
--- a/erts/emulator/test/hipe_SUITE_data/trycatch_3.erl
+++ /dev/null
@@ -1,9 +0,0 @@
--module(trycatch_3).
--export([three/1]).
-
-three({error,Term}) ->
- error(Term);
-three({throw,Term}) ->
- throw(Term);
-three({exit,Term}) ->
- exit(Term).
--
2.31.1
