Changeset 10197 in project


Ignore:
Timestamp:
03/28/08 23:42:01 (13 years ago)
Author:
elf
Message:

several small bugfixes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/3/sendfile/trunk/sendfile.scm

    r7120 r10197  
    6363  sendfile:os-dep:mmap-available?
    6464  sendfile))
    65 (declare
    66  (foreign-declare #<<EOL
     65
     66(foreign-declare #<<EOL
    6767#include "os-dep.h"
    6868#define C_write(fd, b, n)   C_fix(write(C_unfix(fd), C_data_pointer(b), C_unfix(n)))
    6969EOL
    70 ))
     70)
    7171
    7272(use posix lolevel srfi-4)
     
    104104
    105105;;biggest unsigned integer
    106 (define *sendfile:chunk-size* (expt 2 (- %sendfile:word-size 1)))
     106(define *sendfile:chunk-size* (inexact->exact (- (expt 2 %sendfile:word-size) 1)))
    107107
    108108
Note: See TracChangeset for help on using the changeset viewer.