File 1197-distribution_SUITE-Add-a-test-for-the-no_epmd-option.patch of Package erlang

From 766d65a28740cdfaf58c637b078b793c8b0ad7d5 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?J=C3=A9r=C3=B4me=20de=20Bretagne?=
 <jerome.debretagne@gmail.com>
Date: Mon, 12 Apr 2021 22:42:30 +0200
Subject: [PATCH 3/3] distribution_SUITE: Add a test for the -no_epmd option

---
 erts/emulator/test/distribution_SUITE.erl | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

diff --git a/erts/emulator/test/distribution_SUITE.erl b/erts/emulator/test/distribution_SUITE.erl
index 128c9b07e0..b7d871637e 100644
--- a/erts/emulator/test/distribution_SUITE.erl
+++ b/erts/emulator/test/distribution_SUITE.erl
@@ -57,7 +57,7 @@
          bad_dist_ext_control/1,
          bad_dist_ext_connection_id/1,
          bad_dist_ext_size/1,
-         start_epmd_false/1, epmd_module/1,
+         start_epmd_false/1, no_epmd/1, epmd_module/1,
          huge_iovec/1]).
 
 %% Internal exports.
@@ -83,7 +83,7 @@ all() ->
      dist_parallel_send, atom_roundtrip, unicode_atom_roundtrip, atom_roundtrip_r15b,
      contended_atom_cache_entry, contended_unicode_atom_cache_entry,
      bad_dist_structure, {group, bad_dist_ext},
-     start_epmd_false, epmd_module,
+     start_epmd_false, no_epmd, epmd_module,
      huge_iovec].
 
 groups() ->
@@ -1955,6 +1955,11 @@ start_epmd_false(Config) when is_list(Config) ->
 
     ok.
 
+no_epmd(Config) when is_list(Config) ->
+    %% Trying to start a node with -no_epmd but without passing the
+    %% --proto_dist option should fail.
+    {error, timeout} = start_node(no_epmd, "-no_epmd").
+
 epmd_module(Config) when is_list(Config) ->
     %% We need a relay node to test this, since the test node uses the
     %% standard epmd module.
-- 
2.26.2