Mercurial > hg > nginx-tests

comparison h2.t @ 717:3b6ff3b7367d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: fixed multiple header field values representation in h2.t.
author Sergey Kandaurov <pluknet@nginx.com>
date Mon, 28 Sep 2015 16:41:02 +0300
parents e3fd2c8d257e
children ba822b2e899c
comparison
equal deleted inserted replaced
716:e3fd2c8d257e 717:3b6ff3b7367d
2595 } 2595 }
2596 2596
2597 sub add { 2597 sub add {
2598 my ($h, $n, $v) = @_; 2598 my ($h, $n, $v) = @_;
2599 return $h->{$n} = $v unless exists $h->{$n}; 2599 return $h->{$n} = $v unless exists $h->{$n};
2600 $h->{$n} = [ $h->{$n} ]; 2600 $h->{$n} = [ $h->{$n} ] unless ref $h->{$n};
2601 push @{$h->{$n}}, $v; 2601 push @{$h->{$n}}, $v;
2602 } 2602 }
2603 2603
2604 while ($skip < $length) { 2604 while ($skip < $length) {
2605 my $ib = unpack("\@$skip B8", $data); 2605 my $ib = unpack("\@$skip B8", $data);