Mercurial > hg > nginx

comparison src/http/modules/perl/nginx.xs @ 1372:2cc9b6651f75

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
omit unnecessary XSRETURN_EMPTY
author Igor Sysoev <igor@sysoev.ru>
date Mon, 06 Aug 2007 15:40:26 +0000
parents 7dbdf47cdcba
children 37938e68910b
comparison
equal deleted inserted replaced
1371:7dbdf47cdcba 1372:2cc9b6651f75
470 { 470 {
471 r->headers_out.content_length_n = (off_t) SvIV(value); 471 r->headers_out.content_length_n = (off_t) SvIV(value);
472 r->headers_out.content_length = header; 472 r->headers_out.content_length = header;
473 } 473 }
474 474
475 XSRETURN_EMPTY;
476
477 475
478 void 476 void
479 filename(r) 477 filename(r)
480 CODE: 478 CODE:
481 479
597 } 595 }
598 596
599 out: 597 out:
600 598
601 (void) ngx_http_perl_output(r, b); 599 (void) ngx_http_perl_output(r, b);
602
603 XSRETURN_EMPTY;
604 600
605 601
606 void 602 void
607 sendfile(r, filename, offset = -1, bytes = 0) 603 sendfile(r, filename, offset = -1, bytes = 0)
608 CODE: 604 CODE:
686 b->file->fd = fd; 682 b->file->fd = fd;
687 b->file->log = r->connection->log; 683 b->file->log = r->connection->log;
688 684
689 (void) ngx_http_perl_output(r, b); 685 (void) ngx_http_perl_output(r, b);
690 686
691 XSRETURN_EMPTY;
692
693 687
694 void 688 void
695 flush(r) 689 flush(r)
696 CODE: 690 CODE:
697 691
752 ngx_http_request_t *r; 746 ngx_http_request_t *r;
753 747
754 ngx_http_perl_set_request(r); 748 ngx_http_perl_set_request(r);
755 749
756 r->allow_ranges = 1; 750 r->allow_ranges = 1;
757
758 XSRETURN_EMPTY;
759 751
760 752
761 void 753 void
762 unescape(r, text, type = 0) 754 unescape(r, text, type = 0)
763 CODE: 755 CODE:
951 ctx->next = SvRV(ST(2)); 943 ctx->next = SvRV(ST(2));
952 944
953 ngx_log_debug1(NGX_LOG_DEBUG_HTTP, r->connection->log, 0, 945 ngx_log_debug1(NGX_LOG_DEBUG_HTTP, r->connection->log, 0,
954 "perl sleep: %d", ctx->sleep); 946 "perl sleep: %d", ctx->sleep);
955 947
956 XSRETURN_EMPTY;
957
958 948
959 void 949 void
960 log_error(r, err, msg) 950 log_error(r, err, msg)
961 CODE: 951 CODE:
962 952
983 } 973 }
984 974
985 p = (u_char *) SvPV(msg, len); 975 p = (u_char *) SvPV(msg, len);
986 976
987 ngx_log_error(NGX_LOG_ERR, r->connection->log, e, "perl: %s", p); 977 ngx_log_error(NGX_LOG_ERR, r->connection->log, e, "perl: %s", p);
988
989 XSRETURN_EMPTY;