File 2458-Remove-unused-select_cont-4.patch of Package erlang
From 82da42be51ec9b2a832f0232c9e8cdef73016742 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Micha=C5=82=20W=C4=85sowski?= <michal@erlang.org>
Date: Mon, 30 Jun 2025 11:50:48 +0200
Subject: [PATCH 8/8] Remove unused select_cont/4
---
lib/mnesia/doc/guides/mnesia_app_b.md | 5 +----
lib/mnesia/src/mnesia_frag.erl | 7 ++-----
2 files changed, 3 insertions(+), 9 deletions(-)
diff --git a/lib/mnesia/doc/guides/mnesia_app_b.md b/lib/mnesia/doc/guides/mnesia_app_b.md
index bddbd4a26e..0c19dd8aa0 100644
--- a/lib/mnesia/doc/guides/mnesia_app_b.md
+++ b/lib/mnesia/doc/guides/mnesia_app_b.md
@@ -32,8 +32,7 @@ limitations under the License.
write/5, delete/5, delete_object/5,
read/5, match_object/5, all_keys/4,
select/5, select/6, select_cont/3,
- select_cont/4, select_reverse/5,
- select_reverse/6,
+ select_reverse/5, select_reverse/6,
index_match_object/6, index_read/6,
foldl/6, foldr/6, table_info/4,
first/3, next/4, prev/4, last/3,
@@ -90,8 +89,6 @@ select_reverse(ActivityId, Opaque, Tab, MatchSpec, LockKind) ->
select_reverse(ActivityId, Opaque, Tab, MatchSpec, Limit, LockKind) ->
select(ActivityId, Opaque, Tab, MatchSpec, Limit, LockKind).
-select_cont(Tid,Ts,Cont,_Dir) -> select_cont(Tid,Ts,Cont).
-
select_cont(_Tid,_,{frag_cont, '$end_of_table', [],_}) -> '$end_of_table';
select_cont(Tid,Ts,{frag_cont, '$end_of_table', [{Tab,Node,Type}|Rest],Args}) ->
{Spec,LockKind,Limit} = Args,
diff --git a/lib/mnesia/src/mnesia_frag.erl b/lib/mnesia/src/mnesia_frag.erl
index d0422d17d4..bb41ea61f7 100644
--- a/lib/mnesia/src/mnesia_frag.erl
+++ b/lib/mnesia/src/mnesia_frag.erl
@@ -36,9 +36,8 @@
lock/4,
write/5, delete/5, delete_object/5,
read/5, match_object/5, all_keys/4,
- select/5,select/6,select_cont/3,
- select_cont/4, select_reverse/5,
- select_reverse/6,
+ select/5, select/6, select_cont/3,
+ select_reverse/5, select_reverse/6,
index_match_object/6, index_read/6,
foldl/6, foldr/6, table_info/4,
first/3, next/4, prev/4, last/3,
@@ -343,8 +342,6 @@ init_select(Tid,Opaque,Tab,Pat,Limit,LockKind) ->
frag_sel_cont(Res, NameNodes, {Pat,LockKind,Limit})
end.
-select_cont(Tid,Ts,Cont,_Dir) -> select_cont(Tid,Ts,Cont).
-
select_cont(_Tid,_,{frag_cont, '$end_of_table', [],_}) -> '$end_of_table';
select_cont(Tid,Ts,{frag_cont, '$end_of_table', [{Tab,Node,Type}|Rest],Args}) ->
{Spec,LockKind,Limit} = Args,
--
2.43.0