meta/recipes-devtools/perl/perl/test/dist-threads-t-join.t-adjust-ps-option.patch


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40

From 797f99b30288732a3453c8c9dda80baa6f361f8a Mon Sep 17 00:00:00 2001
From: Hongxu Jia <hongxu.jia@windriver.com>
Date: Tue, 1 Jul 2014 15:51:53 +0800
Subject: [PATCH] dist/threads/t/join.t: adjust ps option

The ps's option '-f' is not supported by busybox in oe.

Upstream-Status: Inappropriate
Signed-off-by: Hongxu Jia <hongxu.jia@windriver.com>

---
 dist/threads/t/join.t | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/dist/threads/t/join.t b/dist/threads/t/join.t
index 2272e07..1d4b0e1 100644
--- a/dist/threads/t/join.t
+++ b/dist/threads/t/join.t
@@ -118,7 +118,7 @@ if ($^O eq 'linux') {
                  })->join;
     #print "# mainthread: \$0 = $0\n";
     #print "# pid = $$\n";
-    if (open PS, "ps -f |") { # Note: must work in (all) systems.
+    if (open PS, "ps |") { # Note: must work in (all) systems.
         my ($sawpid, $sawexe);
         while (<PS>) {
             chomp;
@@ -135,10 +135,10 @@ if ($^O eq 'linux') {
         if ($sawpid) {
             ok($sawpid && $sawexe, 'altering $0 is effective');
         } else {
-            skip("\$0 check: did not see pid $$ in 'ps -f |'");
+            skip("\$0 check: did not see pid $$ in 'ps |'");
         }
     } else {
-        skip("\$0 check: opening 'ps -f |' failed: $!");
+        skip("\$0 check: opening 'ps |' failed: $!");
     }
 } else {
     skip("\$0 check: only on Linux");