Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Ledest:erlang:24
erlang
1147-runtime_tools-Remove-usage-of-obsolete-POR...
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File 1147-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
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor