File 2331-ei-Put-erl_call-debug-printsout-behind-HAR... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 2331-ei-Put-erl_call-debug-printsout-behind-HARD_DEBUG.patch of Package erlang (Revision bf6cd7f92ad3019d8dc2ad8158b2b053)

Currently displaying revision bf6cd7f92ad3019d8dc2ad8158b2b053 , Show latest

From 9c57b4aee47f553b577ffa237fbefdcddebd180f Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Tue, 4 May 2021 09:23:09 +0200
Subject: [PATCH 7/7] ei: Put erl_call debug printsout behind HARD_DEBUG

When doing a debug build we do not want the printouts
as they will mess with testcases.
---
 lib/erl_interface/src/prog/erl_call.c | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lib/erl_interface/src/prog/erl_call.c b/lib/erl_interface/src/prog/erl_call.c
index 60940d7ae6..8caf218e0e 100644
--- a/lib/erl_interface/src/prog/erl_call.c
+++ b/lib/erl_interface/src/prog/erl_call.c
@@ -1486,7 +1486,7 @@ static int exec_erlang(ei_cnode *ec,
   sprintf(&argbuf[len],
 	  "-s erl_reply reply %s %d %d ",
 	  inet_ntoa(myaddr),port,(int)getpid());
-#ifdef DEBUG
+#ifdef HARD_DEBUG
   fprintf(stderr,"erl_call: debug %s\n",&argbuf[len]);
 #endif
   len = strlen(argbuf);
@@ -1587,7 +1587,7 @@ static int wait_for_erlang(int sockd, int magic, struct timeval *timeout)
     stop_time.tv_usec -= 1000000;
   }
 
-#ifdef DEBUG
+#ifdef HARD_DEBUG
   fprintf(stderr,"erl_call: debug time is %ld.%06ld, "
 	  "will timeout at %ld.%06ld\n",
 	  now.tv_sec,now.tv_usec,stop_time.tv_sec,stop_time.tv_usec);
@@ -1607,7 +1607,7 @@ static int wait_for_erlang(int sockd, int magic, struct timeval *timeout)
     }
     if (to.tv_sec < 0) return ERL_TIMEOUT;
 
-#ifdef DEBUG
+#ifdef HARD_DEBUG
     fprintf(stderr,"erl_call: debug remaining to timeout: %ld.%06ld\n",
 	    to.tv_sec,to.tv_usec);
 #endif
@@ -1617,7 +1617,7 @@ static int wait_for_erlang(int sockd, int magic, struct timeval *timeout)
       break;
 
     case 0: /* timeout */
-#ifdef DEBUG
+#ifdef HARD_DEBUG
       gettimeofday(&now,NULL);
       fprintf(stderr,"erl_call: debug timed out at %ld.%06ld\n",
 	      now.tv_sec,now.tv_usec);
@@ -1626,7 +1626,7 @@ static int wait_for_erlang(int sockd, int magic, struct timeval *timeout)
       break;
 
     default: /* ready descriptors */
-#ifdef DEBUG
+#ifdef HARD_DEBUG
       gettimeofday(&now,NULL);
       fprintf(stderr,"erl_call: debug got select at %ld.%06ld\n",
 	      now.tv_sec,now.tv_usec);
@@ -1643,7 +1643,7 @@ static int wait_for_erlang(int sockd, int magic, struct timeval *timeout)
 	if ((n=read(fd,buf,16)) >= 0) buf[n]=0x0;
 	close(fd);
 #endif
-#ifdef DEBUG
+#ifdef HARD_DEBUG
 	fprintf(stderr,"erl_call: debug got %d, expected %d\n",
 		atoi(buf),magic);
 #endif
-- 
2.26.2

Places

File 2331-ei-Put-erl_call-debug-printsout-behind-HARD_DEBUG.patch of Package erlang (Revision bf6cd7f92ad3019d8dc2ad8158b2b053)

Places