Perl: use of portable macro instead of an explicit declaration.

This commit is contained in:
Alexander Borisov
2018-08-08 15:04:43 +03:00
parent b2ec830515
commit c67fbf01ad

View File

@@ -801,11 +801,11 @@ static ssize_t
nxt_perl_psgi_io_read(nxt_unit_read_info_t *read_info, void *dst, size_t size) nxt_perl_psgi_io_read(nxt_unit_read_info_t *read_info, void *dst, size_t size)
{ {
ssize_t res; ssize_t res;
PerlInterpreter *my_perl;
nxt_perl_psgi_io_ctx_t *ctx; nxt_perl_psgi_io_ctx_t *ctx;
ctx = read_info->data; ctx = read_info->data;
my_perl = ctx->my_perl;
dTHXa(ctx->my_perl);
res = PerlIO_read(ctx->fp, dst, size); res = PerlIO_read(ctx->fp, dst, size);