File 0420-kernel-test-Cosmetic-test-lib-stuff.patch of Package erlang

From 31ae93e94727766453e3c962a1c2a5fa865e26ea Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Thu, 5 Jun 2025 07:00:31 +0200
Subject: [PATCH 2/2] [kernel|test] Cosmetic test lib stuff

OTP-19684
---
 lib/kernel/test/kernel_test_lib.erl | 9 +++++++++
 lib/kernel/test/kernel_test_lib.hrl | 2 ++
 2 files changed, 11 insertions(+)

diff --git a/lib/kernel/test/kernel_test_lib.erl b/lib/kernel/test/kernel_test_lib.erl
index 6bdd7af1fb..7d105d4744 100644
--- a/lib/kernel/test/kernel_test_lib.erl
+++ b/lib/kernel/test/kernel_test_lib.erl
@@ -41,6 +41,7 @@
 -export([good_hosts/1,
          lookup/3]).
 -export([
+         sz/1,
          os_cmd/1, os_cmd/2,
          mq/0, mq/1,
          ts/0, ts/1
@@ -2583,6 +2584,14 @@ timetrap_scale_factor() ->
     end.
 
 
+%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
+
+sz(B) when is_binary(B) ->
+    byte_size(B);
+sz(L) when is_list(L) ->
+    iolist_size(L).
+
+
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 os_cmd(Cmd) ->
diff --git a/lib/kernel/test/kernel_test_lib.hrl b/lib/kernel/test/kernel_test_lib.hrl
index 2724693902..f359f23eb5 100644
--- a/lib/kernel/test/kernel_test_lib.hrl
+++ b/lib/kernel/test/kernel_test_lib.hrl
@@ -62,6 +62,8 @@
 -define(HAS_SUPPORT_IPV6(),      ?LIB:has_support_ipv6()).
 -define(WHICH_LOCAL_ADDR(D),     ?LIB:which_local_addr((D))).
 
+-define(SZ(X),                   ?LIB:sz((X))).
+
 -define(UNIQ_NODE_NAME,
   list_to_atom(?MODULE_STRING ++ "__" ++
                atom_to_list(?FUNCTION_NAME) ++ "_" ++
-- 
2.43.0

openSUSE Build Service is sponsored by