diff options
-rwxr-xr-x | ext/IPC/SysV/t/msg.t | 12 | ||||
-rwxr-xr-x | ext/IPC/SysV/t/sem.t | 11 |
2 files changed, 23 insertions, 0 deletions
diff --git a/ext/IPC/SysV/t/msg.t b/ext/IPC/SysV/t/msg.t index 2a982f054a..f8c066b384 100755 --- a/ext/IPC/SysV/t/msg.t +++ b/ext/IPC/SysV/t/msg.t @@ -1,3 +1,15 @@ +BEGIN { + eval { require Config; import Config }; + if ($@) { + print "1..0 # Skip: no Config\n"; + exit(0); + } + if ($Config{extensions} !~ m!\bIPC/SysV\b!) { + print "1..0 # Skip: no SysV IPC\n"; + exit(0); + } +} + use IPC::SysV qw(IPC_PRIVATE IPC_RMID IPC_NOWAIT IPC_STAT S_IRWXU S_IRWXG S_IRWXO); use IPC::Msg; diff --git a/ext/IPC/SysV/t/sem.t b/ext/IPC/SysV/t/sem.t index 9d6fff64f2..9fa5704c6f 100755 --- a/ext/IPC/SysV/t/sem.t +++ b/ext/IPC/SysV/t/sem.t @@ -1,3 +1,14 @@ +BEGIN { + eval { require Config; import Config }; + if ($@) { + print "1..0 # Skip: no Config\n"; + exit(0); + } + if ($Config{extensions} !~ m!\bIPC/SysV\b!) { + print "1..0 # Skip: no SysV IPC\n"; + exit(0); + } +} use IPC::SysV qw( SETALL |