diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-18 03:14:58 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-18 03:14:58 +0000 |
commit | f1612b5c9ea43d9872ae3595ce140e5a62ae6cf4 (patch) | |
tree | 5e7980544c0b8fb0f2ac1886aa5b53dd2c80ba04 /t | |
parent | df4447340939b80bd74b2a62bd47699af5016621 (diff) | |
download | perl-f1612b5c9ea43d9872ae3595ce140e5a62ae6cf4.tar.gz |
tweak some op names in change#4177 (will any of this break code that
gropes $@ ?)
p4raw-link: @4177 on //depot/cfgperl: 42d382189339e56f3bd13a71933349bc8b7e8b42
p4raw-id: //depot/perl@4189
Diffstat (limited to 't')
-rwxr-xr-x | t/io/open.t | 4 | ||||
-rwxr-xr-x | t/op/misc.t | 2 | ||||
-rw-r--r-- | t/pragma/warn/op | 10 |
3 files changed, 8 insertions, 8 deletions
diff --git a/t/io/open.t b/t/io/open.t index 80fa0b5d19..418edacf39 100755 --- a/t/io/open.t +++ b/t/io/open.t @@ -79,7 +79,7 @@ print "ok 23\n"; unlink("afile"); } -if ($Is_VMS) { for (24..46) { print "ok $_ # skipped: not Unix fork\n"; } +if ($Is_VMS) { for (24..46) { print "ok $_ # skipped: not Unix fork\n"; } } else { print "# \$!='$!'\nnot " unless open(my $f, '-|', <<'EOC'); ./perl -e "print qq(a row\n); print qq(another row\n)" @@ -91,7 +91,7 @@ print "ok 25\n"; print "not " unless close($f); print "ok 26\n"; } -if ($Is_VMS) { for (27..30) { print "OK $_ # skipped: not Unix fork\n"; } +if ($Is_VMS) { for (27..30) { print "OK $_ # skipped: not Unix fork\n"; } } else { print "# \$!='$!'\nnot " unless open(my $f, '|-', <<'EOC'); ./perl -pe "s/^not //" diff --git a/t/op/misc.t b/t/op/misc.t index f8a44ecaaf..adfcd174fc 100755 --- a/t/op/misc.t +++ b/t/op/misc.t @@ -104,7 +104,7 @@ EXPECT ######## %@x=0; EXPECT -Can't modify hash deref in repeat (x) at - line 1, near "0;" +Can't modify hash dereference in repeat (x) at - line 1, near "0;" Execution of - aborted due to compilation errors. ######## $_="foo"; diff --git a/t/pragma/warn/op b/t/pragma/warn/op index a726140f77..950c0c8ffd 100644 --- a/t/pragma/warn/op +++ b/t/pragma/warn/op @@ -263,7 +263,7 @@ Useless use of rindex in void context at - line 22. Useless use of sprintf in void context at - line 23. Useless use of array element in void context at - line 24. Useless use of array slice in void context at - line 26. -Useless use of hash elem in void context at - line 29. +Useless use of hash element in void context at - line 29. Useless use of hash slice in void context at - line 30. Useless use of unpack in void context at - line 31. Useless use of pack in void context at - line 32. @@ -593,16 +593,16 @@ EXPECT Applying pattern match (m//) to @array will act on scalar(@array) at - line 5. Applying substitution (s///) to @array will act on scalar(@array) at - line 6. Can't modify private array in substitution (s///) at - line 6, near "s/a/b/ ;" -Applying character translation (tr///) to @array will act on scalar(@array) at - line 7. +Applying transliteration (tr///) to @array will act on scalar(@array) at - line 7. Applying pattern match (m//) to @array will act on scalar(@array) at - line 8. Applying substitution (s///) to @array will act on scalar(@array) at - line 9. -Applying character translation (tr///) to @array will act on scalar(@array) at - line 10. +Applying transliteration (tr///) to @array will act on scalar(@array) at - line 10. Applying pattern match (m//) to %hash will act on scalar(%hash) at - line 11. Applying substitution (s///) to %hash will act on scalar(%hash) at - line 12. -Applying character translation (tr///) to %hash will act on scalar(%hash) at - line 13. +Applying transliteration (tr///) to %hash will act on scalar(%hash) at - line 13. Applying pattern match (m//) to %hash will act on scalar(%hash) at - line 14. Applying substitution (s///) to %hash will act on scalar(%hash) at - line 15. -Applying character translation (tr///) to %hash will act on scalar(%hash) at - line 16. +Applying transliteration (tr///) to %hash will act on scalar(%hash) at - line 16. BEGIN not safe after errors--compilation aborted at - line 18. ######## # op.c |