added test case.

This commit is contained in:
Tokuhiro Matsuno 2009-07-22 13:41:31 +09:00
parent 2da4b17d0b
commit 390c5ad8a0

View File

@ -15,6 +15,8 @@ sub pis ($$) {
my @dat = (
0, '00',
(my $foo="0")+0, '00',
{2 => undef}, '81 a1 32 c0',
1, '01',
127, '7f',
128, 'cc 80',