diff options
author | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-11-01 16:57:40 +0000 |
---|---|---|
committer | Mikael Djurfeldt <djurfeldt@nada.kth.se> | 1998-11-01 16:57:40 +0000 |
commit | 83336ffd60f1b3a3b6c8a04a840b56ea00aecdfe (patch) | |
tree | fb5ca5e90c5a4c30eed8ee7ff47e6aebf8d747d3 | |
parent | 99c8588f032b19a74dba855ce97921976a810188 (diff) | |
download | guile-83336ffd60f1b3a3b6c8a04a840b56ea00aecdfe.tar.gz |
Removed some #if 0 which slipped through in previous change
-rw-r--r-- | libguile/fports.c | 10 |
1 files changed, 0 insertions, 10 deletions
diff --git a/libguile/fports.c b/libguile/fports.c index 3a86a047d..5cbbf365a 100644 --- a/libguile/fports.c +++ b/libguile/fports.c @@ -397,12 +397,10 @@ static int local_fgetc (SCM port) { FILE *s = (FILE *) SCM_STREAM (port); -#if 0 pre_read (port); if (feof (s)) return EOF; else -#endif return fgetc (s); } @@ -416,9 +414,7 @@ local_fgets (SCM port, int *len) char *p; /* pointer to current buffer position */ int limit = 80; /* current size of buffer */ -#if 0 pre_read (port); -#endif /* If this is a socket port or something where we can't rely on ftell to determine how much we've read, then call the generic @@ -523,9 +519,7 @@ local_fputc (int c, SCM port) { FILE *fp = (FILE *) SCM_STREAM (port); -#if 0 pre_write (port); -#endif return fputc (c, fp); } @@ -533,9 +527,7 @@ static int local_fputs (char *s, SCM port) { FILE *fp = (FILE *) SCM_STREAM (port); -#if 0 pre_write (port); -#endif return fputs (s, fp); } @@ -546,9 +538,7 @@ local_ffwrite (char *ptr, SCM port) { FILE *fp = (FILE *) SCM_STREAM (port); -#if 0 pre_write (port); -#endif return ffwrite (ptr, size, nitems, fp); } |