Mercurial > hg > nginx-tests
comparison spdy.t @ 379:f42de3a9fd74
Tests: avoid uninitialized warnings in spdy.t.
| author | Maxim Dounin <mdounin@mdounin.ru> |
|---|---|
| date | Thu, 27 Feb 2014 20:51:36 +0400 |
| parents | ba95a443ff1f |
| children | 847ea345becb |
comparison
equal
deleted
inserted
replaced
| 378:de2f7e86866e | 379:f42de3a9fd74 |
|---|---|
| 595 | 595 |
| 596 again: | 596 again: |
| 597 do { | 597 do { |
| 598 $buf = raw_read($sess->{socket}); | 598 $buf = raw_read($sess->{socket}); |
| 599 } until (defined $buf || $tries++ >= $maxtried); | 599 } until (defined $buf || $tries++ >= $maxtried); |
| 600 | |
| 601 $buf = '' if !defined $buf; | |
| 600 | 602 |
| 601 for ($skip = 0; $skip < length $buf; $skip += $length + 8) { | 603 for ($skip = 0; $skip < length $buf; $skip += $length + 8) { |
| 602 my $type = unpack("\@$skip B", $buf); | 604 my $type = unpack("\@$skip B", $buf); |
| 603 $length = hex unpack("\@$skip x5 H6", $buf); | 605 $length = hex unpack("\@$skip x5 H6", $buf); |
| 604 if ($type == 0) { | 606 if ($type == 0) { |