--- ./runtime/Clib/cports.c.orig 2014-02-18 11:37:02.000000000 -0700
+++ ./runtime/Clib/cports.c 2014-02-20 08:04:35.438035870 -0700
@@ -2195,8 +2195,8 @@ bgl_file_to_string( char *path ) {
strerror( errno ),
string_to_bstring( path ) );
} else {
- obj_t res = make_string_sans_fill( sin.st_size );
- int n = read( fd, BSTRING_TO_STRING( res ), sin.st_size );
+ obj_t res = make_string_sans_fill( (int)sin.st_size );
+ ssize_t n = read( fd, BSTRING_TO_STRING( res ), sin.st_size );
close( fd );
@@ -2463,7 +2463,7 @@ bgl_sendchars( obj_t ip, obj_t op, long
}
#if( BGL_HAVE_SENDFILE )
} else {
- if( sz == -1 ) sz = in.st_size;
+ if( sz == -1 ) sz = (long) in.st_size;
if( sz != 0 ) {
#if( BGL_GC_HAVE_BLOCKING )
@@ -2564,7 +2564,7 @@ bgl_sendfile( obj_t name, obj_t op, long
C_SYSTEM_FAILURE(
BGL_IO_PORT_ERROR, "send-file", strerror( errno ), name );
}
- sz = sin.st_size;
+ sz = (long) sin.st_size;
}
#if( !BGL_HAVE_SENDFILE )