diff options
| author | Nicholas Clark <nick@ccl4.org> | 2012-08-30 18:25:53 +0200 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2012-08-31 14:13:01 +0200 |
| commit | 043fec90e88a2e23823af40a5c0b59539fc58069 (patch) | |
| tree | 217d8ca6d7f6e18200a6b3f9c3d96199422d4243 /t/io/pipe.t | |
| parent | 63d7ac5fa5ef436afa9865a56b7c84e54a112722 (diff) | |
| download | perl-043fec90e88a2e23823af40a5c0b59539fc58069.tar.gz | |
Remove the VM/ESA port.
VM/ESA was a mainframe OS. IBM ended service on it in June 2003. It was
superseded by Z/VM.
Diffstat (limited to 't/io/pipe.t')
| -rw-r--r-- | t/io/pipe.t | 10 |
1 files changed, 2 insertions, 8 deletions
diff --git a/t/io/pipe.t b/t/io/pipe.t index 9c165a3372..e41eb18262 100644 --- a/t/io/pipe.t +++ b/t/io/pipe.t @@ -27,11 +27,7 @@ printf PIPE "oY %d - again\n", curr_test(); next_test(); close PIPE; -SKIP: { - # Technically this should be TODO. Someone try it if you happen to - # have a vmesa machine. - skip "Doesn't work here yet", 6 if $^O eq 'vmesa'; - +{ if (open(PIPE, "-|")) { while(<PIPE>) { s/^not //; @@ -171,9 +167,7 @@ SKIP: { } } - SKIP: { - skip "Don't work yet", 9 if $^O eq 'vmesa'; - + { # check that errno gets forced to 0 if the piped program exited # non-zero open NIL, qq{|$Perl -e "exit 23";} or die "fork failed: $!"; |