diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2011-12-08 14:27:15 -0800 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2011-12-08 14:27:15 -0800 |
| commit | 7bc8c9795bd669fcf05bd4a08bed3b162e859ddb (patch) | |
| tree | de7ba5602aacf64be21ddf6aededce5be3357754 /dist/B-Deparse/t/deparse.t | |
| parent | 843b15cc12d1b7f15c7624a8f097be474339d5a8 (diff) | |
| download | perl-7bc8c9795bd669fcf05bd4a08bed3b162e859ddb.tar.gz | |
More tests for deparsing warn()+1, etc.
Diffstat (limited to 'dist/B-Deparse/t/deparse.t')
| -rw-r--r-- | dist/B-Deparse/t/deparse.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/dist/B-Deparse/t/deparse.t b/dist/B-Deparse/t/deparse.t index d71eeaafac..4d90a1bbab 100644 --- a/dist/B-Deparse/t/deparse.t +++ b/dist/B-Deparse/t/deparse.t @@ -873,6 +873,8 @@ CORE::do({}); () = (eof) + 1; () = (return) + 1; () = (return, 1); +() = warn; +() = warn() + 1; () = setpgrp() + 1; #### # [perl #63558] open local(*FH) |