diff options
Diffstat (limited to 'meta/recipes-devtools/perl/perl-5.14.2/debian/m68k_thread_stress.diff')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.14.2/debian/m68k_thread_stress.diff | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.14.2/debian/m68k_thread_stress.diff b/meta/recipes-devtools/perl/perl-5.14.2/debian/m68k_thread_stress.diff new file mode 100644 index 0000000000..f1dfe36043 --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.14.2/debian/m68k_thread_stress.diff | |||
@@ -0,0 +1,46 @@ | |||
1 | From 55a718425dc4612ac01850ef786f75f072b20b9e Mon Sep 17 00:00:00 2001 | ||
2 | From: Niko Tyni <ntyni@debian.org> | ||
3 | Date: Mon, 8 Sep 2008 20:48:14 +0300 | ||
4 | Subject: Disable some threads tests on m68k for now due to missing TLS. | ||
5 | |||
6 | Bug-Debian: http://bugs.debian.org/495826 | ||
7 | Bug-Debian: http://bugs.debian.org/517938 | ||
8 | |||
9 | Patch-Name: debian/m68k_thread_stress.diff | ||
10 | --- | ||
11 | dist/threads-shared/t/stress.t | 4 ++++ | ||
12 | dist/threads-shared/t/waithires.t | 6 ++++++ | ||
13 | 2 files changed, 10 insertions(+), 0 deletions(-) | ||
14 | |||
15 | diff --git a/dist/threads-shared/t/stress.t b/dist/threads-shared/t/stress.t | ||
16 | index 652a3e6..2f1b576 100644 | ||
17 | --- a/dist/threads-shared/t/stress.t | ||
18 | +++ b/dist/threads-shared/t/stress.t | ||
19 | @@ -11,6 +11,10 @@ BEGIN { | ||
20 | print("1..0 # SKIP Broken under HP-UX 10.20\n"); | ||
21 | exit(0); | ||
22 | } | ||
23 | + if ($^O eq 'linux' && $Config{archname} =~ /^m68k/) { | ||
24 | + print("1..0 # Skip: no TLS on m68k yet <http://bugs.debian.org/495826>\n"); | ||
25 | + exit(0); | ||
26 | + } | ||
27 | } | ||
28 | |||
29 | use ExtUtils::testlib; | ||
30 | diff --git a/dist/threads-shared/t/waithires.t b/dist/threads-shared/t/waithires.t | ||
31 | index 3c3e852..349c5b4 100644 | ||
32 | --- a/dist/threads-shared/t/waithires.t | ||
33 | +++ b/dist/threads-shared/t/waithires.t | ||
34 | @@ -16,6 +16,12 @@ BEGIN { | ||
35 | if (! eval 'use Time::HiRes "time"; 1') { | ||
36 | Test::skip_all('Time::HiRes not available'); | ||
37 | } | ||
38 | + | ||
39 | + if ($^O eq 'linux' && $Config{archname} =~ /^m68k/) { | ||
40 | + print("1..0 # Skip: no TLS on m68k yet <http://bugs.debian.org/495826>\n"); | ||
41 | + exit(0); | ||
42 | + } | ||
43 | + | ||
44 | } | ||
45 | |||
46 | use ExtUtils::testlib; | ||