| 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;" |
|---|