diff options
| author | Karl Williamson <khw@cpan.org> | 2015-05-13 19:25:22 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2015-08-01 10:34:50 -0600 |
| commit | 465ec97d385ebcbccc3851e183df40731041d82f (patch) | |
| tree | 43f768ed9ee45dee254b371ba5dc610f259d061e /t | |
| parent | 47b0825172d13eb5816cb0ec86fbb52a24ada8ca (diff) | |
| download | perl-465ec97d385ebcbccc3851e183df40731041d82f.tar.gz | |
t/opbasic/cmp.t: Add test for NUL
NUL can present problems for string handling; better test it
Diffstat (limited to 't')
| -rw-r--r-- | t/opbasic/cmp.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/opbasic/cmp.t b/t/opbasic/cmp.t index 43e434590a..241eb491a6 100644 --- a/t/opbasic/cmp.t +++ b/t/opbasic/cmp.t @@ -35,7 +35,7 @@ $uv_bigi |= 0x0; my @array = qw(perl rules); my @raw, @upgraded, @utf8; -foreach ("\x{1F4A9}", chr(163), 'N') { +foreach ("\0", "\x{1F4A9}", chr(163), 'N') { push @raw, $_; my $temp = $_ . chr 256; chop $temp; |