This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
ad6656a
)
Fix skipping tests with threads in last commit
author
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Mon, 22 Jun 2009 10:00:28 +0000
(12:00 +0200)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Mon, 22 Jun 2009 10:00:28 +0000
(12:00 +0200)
lib/perl5db.t
patch
|
blob
|
blame
|
history
diff --git
a/lib/perl5db.t
b/lib/perl5db.t
index
d5747cf
..
22781d4
100644
(file)
--- a/
lib/perl5db.t
+++ b/
lib/perl5db.t
@@
-89,7
+89,7
@@
like($contents, qr/sub factorial/,
like($output, qr/Undefined symbols 0/, 'there are no undefined values in the symbol table');
}
-{
+
SKIP:
{
if ( $Config{usethreads} ) {
skip('This perl has threads, skipping non-threaded debugger tests');
} else {
@@
-99,7
+99,7
@@
like($contents, qr/sub factorial/,
}
}
-{
+
SKIP:
{
if ( $Config{usethreads} ) {
local $ENV{PERLDB_OPTS} = "ReadLine=0 NonStop=1";
my $output = runperl(switches => [ '-dt' ], progfile => '../lib/perl5db/t/symbol-table-bug');