File 2428-kernel-enet-test-Skip-if-notsup.patch of Package erlang

From 5af1aeaf9ce1098b5e0d4b50e003ebd412e48dca Mon Sep 17 00:00:00 2001
From: Micael Karlberg <bmk@erlang.org>
Date: Thu, 12 Jun 2025 07:08:45 +0200
Subject: [PATCH 08/14] [kernel|enet|test] Skip if 'notsup'

The functions tested are only supported on Windows, skip
in case 'notsup' is thrown.

OTP-19674
---
 lib/kernel/test/prim_net_SUITE.erl | 46 ++++++++----------------------
 1 file changed, 12 insertions(+), 34 deletions(-)

diff --git a/lib/kernel/test/prim_net_SUITE.erl b/lib/kernel/test/prim_net_SUITE.erl
index 90856a444a..16b7b2d917 100644
--- a/lib/kernel/test/prim_net_SUITE.erl
+++ b/lib/kernel/test/prim_net_SUITE.erl
@@ -487,7 +487,12 @@ get_if_entry(_Config) when is_list(_Config) ->
     tc_try(?FUNCTION_NAME,
 	   fun() -> ok end,
            fun() ->
-                   ok = do_get_if_entry()
+                   try
+                       ok = do_get_if_entry()
+                   catch
+                       error:notsup = NOTSUP ->
+                           skip(NOTSUP)
+                   end
            end).
 
 do_get_if_entry() ->
@@ -544,7 +549,12 @@ get_interface_info(_Config) when is_list(_Config) ->
     tc_try(?FUNCTION_NAME,
 	   fun() -> ?HAS_SUPPORT_IPV4() end,
            fun() ->
-                   ok = do_get_interface_info()
+                   try
+                       ok = do_get_interface_info()
+                   catch
+                       error:notsup = NOTSUP ->
+                           skip(NOTSUP)
+                   end
            end).
 
 do_get_interface_info() ->
@@ -572,38 +582,6 @@ gii_verify_result([IF | IFs]) ->
     end.
 
 
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-%% local_host() ->
-%%     try net_adm:localhost() of
-%%         Host when is_list(Host) ->
-%% 	    %% Convert to shortname if long
-%% 	    case string:tokens(Host, [$.]) of
-%% 		[H|_] ->
-%% 		    list_to_atom(H)
-%% 	    end
-%%     catch
-%%         C:E:S ->
-%%             erlang:raise(C, E, S)
-%%     end.
-
-
-%% This gets the local address (not 127.0...)
-%% We should really implement this using the (new) net module,
-%% but until that gets the necessary functionality...
-%% which_local_addr(Domain) ->
-%%     ?LIB:which_local_addr(Domain).
-
-
-%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
-
-%% monitored_by() ->
-%%     monitored_by(self()).
-%% monitored_by(Pid) ->	
-%%     {monitored_by, Refs} = erlang:process_info(Pid, monitored_by),
-%%     Refs.
-
-
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 
 %% not_supported(What) ->
-- 
2.43.0