| 1 | Index: sendfile.setup
|
|---|
| 2 | ===================================================================
|
|---|
| 3 | --- sendfile.setup (revision 22712)
|
|---|
| 4 | +++ sendfile.setup (working copy)
|
|---|
| 5 | @@ -38,7 +38,7 @@
|
|---|
| 6 | int main(){
|
|---|
| 7 | int src,dst;
|
|---|
| 8 | off_t offset,res;
|
|---|
| 9 | - return sendfile(src,dst,offset,&res,NULL,0);
|
|---|
| 10 | + return sendfile(src,dst,offset,&res,0,0);
|
|---|
| 11 | }
|
|---|
| 12 | CODE
|
|---|
| 13 | )
|
|---|
| 14 | Index: strategies/sendfile.macos.scm
|
|---|
| 15 | ===================================================================
|
|---|
| 16 | --- strategies/sendfile.macos.scm (revision 22712)
|
|---|
| 17 | +++ strategies/sendfile.macos.scm (working copy)
|
|---|
| 18 | @@ -1,4 +1,8 @@
|
|---|
| 19 | -(foreign-declare "#include<sys/socket.h>\n#include<sys/types.h>#include <sys/uio.h>")
|
|---|
| 20 | +(foreign-declare "
|
|---|
| 21 | +#include <sys/socket.h>
|
|---|
| 22 | +#include <sys/types.h>
|
|---|
| 23 | +#include <sys/uio.h>
|
|---|
| 24 | +#include <errno.h>")
|
|---|
| 25 | (define %sendfile-implementation
|
|---|
| 26 | (foreign-lambda* double ((integer src) (integer dst) (double offset) (unsigned-integer to_send))
|
|---|
| 27 | "off_t res = (off_t)to_send;"
|
|---|
