File 0797-runtime_tools-Remove-usage-of-obsolete-PORT_CONTROL_.patch of Package erlang

From d9bff4b4b461adf3dab6f0a77f1e51fea90e7490 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lukas=20Backstr=C3=B6m?= <lukas@erlang.org>
Date: Mon, 28 Oct 2024 11:04:01 +0100
Subject: [PATCH 07/10] runtime_tools: Remove usage of obsolete
 PORT_CONTROL_FLAG_HEAVY

This flag is had no effect since at least R13B.
---
 lib/runtime_tools/c_src/trace_file_drv.c | 9 +--------
 1 file changed, 1 insertion(+), 8 deletions(-)

diff --git a/lib/runtime_tools/c_src/trace_file_drv.c b/lib/runtime_tools/c_src/trace_file_drv.c
index 37a8149777..ea4a3eefd5 100644
--- a/lib/runtime_tools/c_src/trace_file_drv.c
+++ b/lib/runtime_tools/c_src/trace_file_drv.c
@@ -377,17 +377,15 @@ static void trace_file_outputv(ErlDrvData handle, ErlIOVec *ev)
 static void trace_file_output(ErlDrvData handle, char *buff,
 			      ErlDrvSizeT bufflen)
 {
-    int heavy = 0;
     TraceFileData *data = (TraceFileData *) handle;
     unsigned char b[5] = "";
     put_be((unsigned) bufflen, b + 1);
     switch (my_write(data, (unsigned char *) b, sizeof(b))) {
     case 1:
-	heavy = !0;
     case 0:
 	switch (my_write(data, (unsigned char *) buff, bufflen)) {
 	case 1:
-	    heavy = !0;
+            break;
 	case 0:
 	    break;
 	case -1:
@@ -408,12 +406,8 @@ static void trace_file_output(ErlDrvData handle, char *buff,
 		driver_failure_posix(data->port, errno); /* XXX */
 		return;
 	    }
-	    heavy = !0;
 	}
     }
-    if (heavy) {
-	set_port_control_flags(data->port, PORT_CONTROL_FLAG_HEAVY);
-    }
 }
 
 /*
@@ -577,7 +571,6 @@ static int my_write(TraceFileData *data, unsigned char *buff, int siz)
     } 
     memcpy(data->buff, buff + wrote, siz - wrote);
     data->buff_pos = siz - wrote;
-    set_port_control_flags(data->port, PORT_CONTROL_FLAG_HEAVY);
     return 1;
 }
 
-- 
2.43.0