File 0992-beam_disasm-cleanup.patch of Package erlang

From c7c43320931ed1ac0e78585d6b9ea3342598f5ca Mon Sep 17 00:00:00 2001
From: Ilya Klyuchnikov <ilyaklyuchnikov@meta.com>
Date: Wed, 13 Aug 2025 09:21:14 +0100
Subject: [PATCH] beam_disasm: cleanup

---
 lib/compiler/src/beam_disasm.erl | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lib/compiler/src/beam_disasm.erl b/lib/compiler/src/beam_disasm.erl
index ef6de4a869..e507e95db2 100644
--- a/lib/compiler/src/beam_disasm.erl
+++ b/lib/compiler/src/beam_disasm.erl
@@ -630,7 +630,7 @@ decode_z_tagged(Tag,B,Bs,Literals,Types) when (B band 16#08) =:= 0 ->
 	2 -> % fr
 	    decode_fr(Bs);
 	3 -> % allocation list
-	    decode_alloc_list(Bs, Literals);
+	    decode_alloc_list(Bs);
 	4 -> % literal
 	    {{u,LitIndex},RestBs} = decode_arg(Bs),
 	    case gb_trees:get(LitIndex, Literals) of
@@ -666,13 +666,13 @@ decode_fr(Bs) ->
     {{u,Fr},RestBs} = decode_arg(Bs),
     {{fr,Fr},RestBs}.
 
-decode_alloc_list(Bs, Literals) ->
+decode_alloc_list(Bs) ->
     {{u,N},RestBs} = decode_arg(Bs),
-    decode_alloc_list_1(N, Literals, RestBs, []).
+    decode_alloc_list_1(N, RestBs, []).
 
-decode_alloc_list_1(0, _Literals, RestBs, Acc) ->
+decode_alloc_list_1(0, RestBs, Acc) ->
     {{u,{alloc,lists:reverse(Acc)}},RestBs};
-decode_alloc_list_1(N, Literals, Bs0, Acc) ->
+decode_alloc_list_1(N, Bs0, Acc) ->
     {{u,Type},Bs1} = decode_arg(Bs0),
     {{u,Val},Bs} = decode_arg(Bs1),
     Res = case Type of
@@ -680,7 +680,7 @@ decode_alloc_list_1(N, Literals, Bs0, Acc) ->
 	      1 -> {floats,Val};
               2 -> {funs,Val}
 	  end,
-    decode_alloc_list_1(N-1, Literals, Bs, [Res|Acc]).
+    decode_alloc_list_1(N-1, Bs, [Res|Acc]).
 
 %%-----------------------------------------------------------------------
 %% take N bytes from a stream, return {Taken_bytes, Remaining_bytes}
-- 
2.51.0