Silence OTP crash reports when epmd unavailable in multinode tests

Author: lupodevelop

test/multinode_peer_test.gleam

@@ -84,9 +84,14 @@ fn real_peer_global_lookup_roundtrip() -> Nil {
 }
 
 fn check_distributed() -> Bool {
-  case cluster.start_node("distribute_test@127.0.0.1", "testcookie") {
+  let prev = test_helpers.silence_logger()
+  let result = case
+    cluster.start_node("distribute_test@127.0.0.1", "testcookie")
+  {
     Ok(Nil) -> True
     Error(cluster.AlreadyStarted) -> True
     Error(_) -> False
   }
+  test_helpers.restore_logger(prev)
+  result
 }

test/multinode_real_test.gleam

@@ -71,7 +71,10 @@ fn skip_if_no_distribution(_test_id: String, _reason: String) -> Nil {
 // ---------------------------------------------------------------------------
 
 pub fn z2_global_sync_race_resolves_within_window_test() {
-  case ensure_distribution_ffi() {
+  let prev = test_helpers.silence_logger()
+  let dist = ensure_distribution_ffi()
+  test_helpers.restore_logger(prev)
+  case dist {
     Error(reason) ->
       skip_if_no_distribution("Z2", "distribution unavailable: " <> reason)
     Ok(_origin) -> {
@@ -120,7 +123,10 @@ pub fn z2_global_sync_race_resolves_within_window_test() {
 // ---------------------------------------------------------------------------
 
 pub fn z3_cross_node_register_global_picks_one_winner_test() {
-  case ensure_distribution_ffi() {
+  let prev = test_helpers.silence_logger()
+  let dist = ensure_distribution_ffi()
+  test_helpers.restore_logger(prev)
+  case dist {
     Error(reason) ->
       skip_if_no_distribution("Z3", "distribution unavailable: " <> reason)
     Ok(_origin) -> {

test/test_helpers.gleam

@@ -2,6 +2,8 @@
 ///
 /// Provides a unique ID generator for test isolation so each test
 /// uses a unique name and won't collide with other tests.
+import gleam/dynamic.{type Dynamic}
+
 @external(erlang, "erlang", "unique_integer")
 fn erlang_unique_int() -> Int
 
@@ -16,3 +18,9 @@ pub fn unique_id() -> String {
     False -> n
   })
 }
+
+@external(erlang, "telemetry_test_ffi", "silence_logger")
+pub fn silence_logger() -> Dynamic
+
+@external(erlang, "telemetry_test_ffi", "restore_logger")
+pub fn restore_logger(prev: Dynamic) -> Nil