phpged/unit
1
0
Fork 0
Code Issues 1 Pull requests Projects 1 Releases Packages Wiki Activity

Tests: added Perl test with many responses using streaming body.

Browse source
This commit is contained in:
Andrei Zeliankou 2023-03-14 11:06:09 +00:00
parent fa81d7a11a
commit 28bdeec614
2 changed files with 16 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
test/perl/streaming_body_multiple_responses/psgi.pl Normal file
View file

@ -0,0 +1,11 @@
my $counter = 2;
my $app = sub {
my $env = shift;
return sub {
my $responder = shift;
$responder->([200, ['Content-Type'=>'text/plain'], [$counter++]]);
$responder->([200, ['Content-Type'=>'text/plain'], [$counter++]]);
};
};

5
test/test_perl_application.py
View file

@ -179,6 +179,11 @@ class TestPerlApplication(TestApplicationPerl):
assert self.get()['body'] == 'body\n', 'body io file'
def test_perl_streaming_body_multiple_responses(self):
self.load('streaming_body_multiple_responses')
assert self.get()['status'] == 200
@pytest.mark.skip('not yet')
def test_perl_application_syntax_error(self, skip_alert):
skip_alert(r'PSGI: Failed to parse script')