Blob Blame Raw
--- ./src/iostream.c.orig	2013-02-01 18:09:31.000000000 -0700
+++ ./src/iostream.c	2013-02-20 09:43:04.001249335 -0700
@@ -21,8 +21,6 @@
 **
 */
 
-#define _GNU_SOURCE  /* is used for ptsname_r prototype etc. */
-
 #include        "system.h"              /* system dependent part           */
 
 
--- ./src/streams.c.orig	2013-02-01 18:09:31.000000000 -0700
+++ ./src/streams.c	2013-02-20 09:32:40.123439294 -0700
@@ -2134,13 +2134,13 @@ Obj FuncREAD_STRING_FILE (
         struct stat fstatbuf;
         if ( syBuf[INT_INTOBJ(fid)].pipe == 0 &&
              fstat( syBuf[INT_INTOBJ(fid)].fp,  &fstatbuf) == 0 ) {
-            len = fstatbuf.st_size;
+            len = (Int) fstatbuf.st_size;
             str = NEW_STRING( len );
             ret = read( syBuf[INT_INTOBJ(fid)].fp, 
                         CHARS_STRING(str), len);
             CHARS_STRING(str)[ret] = '\0';
             SET_LEN_STRING(str, ret);
-            if ( ret == len ) {
+            if ( (off_t) ret == fstatbuf.st_size ) {
                  return str;
             }
         }