File: skip-event-tests.patch

package info (click to toggle)
libdbd-firebird-perl 0.91-2%2Bdeb7u1
  • links: PTS, VCS
  • area: main
  • in suites: wheezy
  • size: 680 kB
  • sloc: perl: 4,085; ansic: 2,262; makefile: 14
file content (41 lines) | stat: -rw-r--r-- 1,209 bytes parent folder | download | duplicates (2)
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
41
commit c3306d5c53d31166818fa644ccd4674aa41afc21
Author: Damyan Ivanov <dmn@debian.org>
Commit: Damyan Ivanov <dmn@debian.org>

    t/*event*.t: skip if DBD_FIREBIRD_TEST_SKIP_EVENTS is in the environment
    
    it seems that these two tests fail on several of Debian's
    architectures (armel, ia64, kfreebsd-amd64, kfreebsd-i386 and
    s390).
    
    Having an easy way to skip them until the problem is found
    and fixed would be nice.

diff --git a/t/80-event-ithreads.t b/t/80-event-ithreads.t
index 1e77578..cd180a7 100644
--- a/t/80-event-ithreads.t
+++ b/t/80-event-ithreads.t
@@ -18,6 +18,9 @@ use Config;
 use Test::More;
 use lib 't','.';
 
+plan skip_all => 'DBD_FIREBIRD_TEST_SKIP_EVENTS found in the environment'
+    if $ENV{DBD_FIREBIRD_TEST_SKIP_EVENTS};
+
 use TestFirebird;
 my $T = TestFirebird->new;
 
diff --git a/t/81-event-fork.t b/t/81-event-fork.t
index b192fd1..89e0095 100644
--- a/t/81-event-fork.t
+++ b/t/81-event-fork.t
@@ -11,6 +11,9 @@ use POSIX qw(:signal_h);
 use Test::More;
 use lib 't','.';
 
+plan skip_all => 'DBD_FIREBIRD_TEST_SKIP_EVENTS found in the environment'
+    if $ENV{DBD_FIREBIRD_TEST_SKIP_EVENTS};
+
 use TestFirebird;
 my $T = TestFirebird->new;