From 790ac0003ce854943cdac85b4843f20410b0bd5a Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Tue, 2 Apr 2019 16:42:26 +0200
Subject: erts: Fix gcc warning in to_erl

---
 erts/etc/unix/to_erl.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'erts/etc')

diff --git a/erts/etc/unix/to_erl.c b/erts/etc/unix/to_erl.c
index ed4fe12e8b..1448980f77 100644
--- a/erts/etc/unix/to_erl.c
+++ b/erts/etc/unix/to_erl.c
@@ -415,7 +415,7 @@ int main(int argc, char **argv)
 
 	if (len) {
 #ifdef DEBUG
-	    (void)write(1, buf, len);
+	    write_all(1, buf, len);
 #endif
 	    if (write_all(wfd, buf, len) != len) {
 		fprintf(stderr, "Error in writing to FIFO.\n");
-- 
cgit v1.2.3


From 290a5b02b9c9d66729ac87b7099a8ca6fa2e8bc2 Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Mon, 15 Apr 2019 11:29:50 +0200
Subject: erts: Fix etp-process-info to print exiting and free processes

---
 erts/etc/unix/etp-commands.in | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'erts/etc')

diff --git a/erts/etc/unix/etp-commands.in b/erts/etc/unix/etp-commands.in
index dc28107ef5..36786aa302 100644
--- a/erts/etc/unix/etp-commands.in
+++ b/erts/etc/unix/etp-commands.in
@@ -2090,7 +2090,7 @@ define etp-process-info-int
     etp-pid2proc-1 $etp_proc->common.id
     etp-process-info $proc
   else
-  if (*(((Uint32 *) &($etp_proc->state))) & 0x4) == 0
+  if (*(((Uint32 *) &($etp_proc->state))) & 0x800) == 0
     if ($etp_proc->common.u.alive.reg)
       printf "  Registered name: "
       etp-1 $etp_proc->common.u.alive.reg->name
-- 
cgit v1.2.3


From 37e307235abf4ceb3dd4f4f59a3bae7e187e091d Mon Sep 17 00:00:00 2001
From: Lukas Larsson <lukas@erlang.org>
Date: Mon, 15 Apr 2019 11:34:39 +0200
Subject: erts: Fix cerl -rr to use correct etp file

---
 erts/etc/unix/cerl.src | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'erts/etc')

diff --git a/erts/etc/unix/cerl.src b/erts/etc/unix/cerl.src
index bcd64d242e..8cfc2d549e 100644
--- a/erts/etc/unix/cerl.src
+++ b/erts/etc/unix/cerl.src
@@ -320,7 +320,7 @@ if [ "x$GDB" = "x" ]; then
             if [ "$1" = "-p" ]; then
                 echo 'set $etp_rr_run_until_beam = 1' >> $cmdfile
             fi
-            cat $ROOTDIR/erts/etc/unix/etp-commands.in >> $cmdfile
+            cat $ROOTDIR/erts/etc/unix/etp-commands >> $cmdfile
             exec rr replay -x $cmdfile $*
         elif [ $1 = ps ]; then
             shift
-- 
cgit v1.2.3