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
(from parent 1:
7f73a9f
)
XS constants fail when their value is called for, not at import.
author
Nicholas Clark
<nick@ccl4.org>
Tue, 19 Jul 2005 21:08:17 +0000
(21:08 +0000)
committer
Nicholas Clark
<nick@ccl4.org>
Tue, 19 Jul 2005 21:08:17 +0000
(21:08 +0000)
This might be construed as a bug. Fixing is probably a greater evil.
p4raw-id: //depot/perl@25188
ext/POSIX/t/sigaction.t
patch
|
blob
|
blame
|
history
diff --git
a/ext/POSIX/t/sigaction.t
b/ext/POSIX/t/sigaction.t
index
7ab6043
..
b4e229d
100644
(file)
--- a/
ext/POSIX/t/sigaction.t
+++ b/
ext/POSIX/t/sigaction.t
@@
-179,7
+179,7
@@
kill 'HUP', $$;
ok($ok, "safe signal delivery must work");
SKIP: {
- eval 'use POSIX qw(%SIGRT SIGRTMIN SIGRTMAX)';
+ eval 'use POSIX qw(%SIGRT SIGRTMIN SIGRTMAX)
; SIGRTMIN + SIGRTMAX
';
skip("no SIGRT signals", 4) if $@;
ok(SIGRTMAX > SIGRTMIN, "SIGRTMAX > SIGRTMIN");
is(scalar %SIGRT, SIGRTMAX() - SIGRTMIN() + 1, "scalar SIGRT");